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Mo 
Disc Space Economies 
Coloured Titles. 


There has been a predictably high demand by members for the 1.2 ROM, and 
we are Starting to receive shipments of the device from Acorn. We are 
getting these out with a very short turn-around, but supplies inevitably lag 
behind orders - even though we have ordered many thousands of units from 
Acorn well in advance. Nevertheless we expect to be able to keep within the 
4-6 week delivery period mentioned last month. If you do wait longer than 
this, we would urge you to read announcements in next month's magazine 
before writing to us, since it is almost certain that the delay will be 
beyond our control. 


BEEBUG 


This issue is again larger than the previous one, and we have tried to 
smarten up the cover a little. The next issue is our Anniversary issue, and 
will be accompanied by a BBC micro quick reference card. We hope to make it 
an even better issue than the present one; and it will also contain a 
cross-referenced index of all previous issues, and a binder offer. 


NEXT MONTH — SPECIAL ISSUE 


* Free BBC micro reference card with each issue. 

* Utility | Editor - a program which lists variables & 
procedures, and will search and replace variable names etc. 
within a program. 

* Cassette Recorders for the Beeb - a review of currently 

available models. 

Composer - compose your own music with this useful utility. 

Torch discpack review. 

Implementing macros on the BBC assembler. 

Acornsoft Games reviewed. 

Multi-key - a program which effectively gives you up to 27 

user defined keys. 

* New 16k invader game. 

l * Bar Chart generator program. 

* Double height character routine for all modes. 


: * plus newcomers section and many hints and tips. 
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Front cover illustration depicts screen shots from previous issues. 
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3D ROTATION (632k) 


Text by Adrian Calcraft, Program by J Hastings 


This is an extremely interesting program sent in by James Hastings which enables 


shapes to be drawn in three dimensions and then viewed from any angle, and at any 
distance. | 


The object to be drawn is defined around the Y axis. 


in the program through data b) Cursor keys UP and DOWN rotate 
statements, which are easily set up, around the X axis. 

as they are the X, Y and Z c) "RETURN" and the "]" key (left of 
co-ordinates of the "corners" of the RETURN) rotate around the Z axis. 
object. Once these are entered the d) "DELETE" and "COPY" reduce and 
program is run, and displays a front increase the size of the object. 
view using mode 4 graphics. The | | 

object may then be rotated about any This provides the ability to view 
axis or viewed from nearer or further from any point, including actually 
simply by pressing one of 8 keys. The from within the object itself. The 
program will only draw and rotate program always draws all lines of the 
objects made up from straight lines, object concerned as if it were a wire 
but there is no apparent limit to the frame. 

complexity of the  "wire-frame" 


objects generated. 


HOW TO USE THE PROGRAM 


Type in the program as listed. The 
reason that the main program starts 
fron line 1000 is to allow the 
earlier lines to be used for the data 
Statements to define objects that you 
may develop later. The data 
statements on lines 30 to 80 define a 
3D cube. Pictures of this are 
included with the article. 


CREATING A NEW 2-D OBJECT 


Designing your own shapes is very 
easy. To start with let us consider 
how to draw a simple square in 2 
dimensions. (The program will equally 
well draw and display 2D objects in a 
3D field of vision). 


Take a piece of paper (graph paper 
is even better) and draw a large 
cross in the middle. This will 
represent the X and Y axes upon which 


Run the program. You should see a we will sketch the object, in this 
cube, viewed from one side. The cube case a square. Now draw a large 
may now be moved using the following Square with the cross at its centre. 
keys; Number the corners of the square 


a) Cursor keys LEFT and RIGHT rotate anti-clockwise, from 1 to 4, starting 
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with the top right corner as 1. 


We now need to work out the X, Y 
and Z co-ordinates of the square. 
Let's assume for convenience that the 
length of each side of the square is 
1000 units. 


This makes the xX and Y 
co-ordinates of point l... 500,500. 
As the object is flat (we are only 
drawing it in 2D), the Z co-ordinate 
will be 9. 

So the co-ordinates of point 1 are 
500,500,0  (co-ordinates are always 
given in the order X, Y, Z) 

Similarly those of point 2 are 
-500,500,0 

Point 3's are —500,—500,0 

Point 4's are 500,—500,9 


We can now compose the data 
Statements for the program. These 
will be inserted into the program on 
any line numbers up to 990 and will 
replace those in the program listed 
below on lines up to 990. The program 
requires information in the following 
format. 

1) Number of "corners", followed by 
the X, Y and Z co-ordinate of each 
"corner", 

2) Number of lines to be drawn, 
followed by the "corner numbers" 
which they should join. 

This may sound complicated but is in 
fact very straight forward. The 
number of corners in our square is 
obviously 4 and we have worked out 
the co-ordinates already, so the 
first data statement will read: 

30 DATA 4,500,500,0,—500,500, 

9,—500,—500,0,500,—500,0 
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The number of lines is also 4. If 
you look at your sketch you will see 
that we have numbered the corners 
from ] to 4. The lines of the square 
go from point ] to point 2, point 2 
to point 3, point 3 to point 4, and 
point 4 to point 1. This is all that 
is required for the second data 
statement, which we can now write: 

40 DATA 4,1,2,2,3,3,4,4,1 


That's all there is to it. These 
two lines, 30 and 49, should replace 
the data statements in the program 
listed below on lines 30, 40 and 89. 
The | actual line numbers are 
irrelevant as long as they are below 
1000. Type them in and run the 
program, remembering to check that 
previous data statements, such as 
line 80 have been removed. 


HOW TO DRAW YOUR OWN 3D OBJECT. 


To do this we follow exactly the 
Same process as above but now using 
an object with depth, eg a pyramid. 
As this is drawn as an extension to a 
square, we will be able to use some 
of the above calculated co-ordinates. 


Take the sketch of the square made 
earlier and consider the Z axis. This 
is at right angles to the other two 
axes and can be thought of as 
extending from above the paper, 
through the centre of the cross, to 
below the piece of paper. When 
calculating 3D co-ordinates you have 
the choice of either imagining the 
points not actually on the paper, or 
attempting to sketch them using 
perspective. 
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To continue with the 
consider its apex, which we will 
define, for convenience, at a height 
of 500 units. This places it exactly 
over the intersection of the X and Y 
axes at a height of 500. Consequently 
its co-ordinates will be 0,0,500. If 
we number the apex as "corner" 5, you 
can see that it will require lines to 
be drawn joining it to "corners" 
1,2,3 and 4. We now have an object 
with 5 "corners" and 8 lines. The 
data statements can be therefore 
represented as follows: 


(5) |[ø,ø,5øø] 
Ma 
PÅ N 
pt 


_— V0, soo gs — 


(3) Fs 


| Pd 
| (-500,-500,0] 


10 REM Points data 

20 

30 DATA 8,-500,500,500,500,500,500, 
500,—500,500,—500,—500,500 
500,—500,—500,—500,—500,—500 


50 

60 REM Lines data 

70 

8Ø DATA 12,1,2,2,3,3,4,4,1,1,5,2,6, 
3,7,4,8,5,6,6,7,7,8,8,5 

96 
1000 ON ERROR GOTO 11890 
1018 MODE 4 


1020 VDU 29,640; 512; 23;8202;0;0;0; 
1030 *FX 4,1 

1040 PROCassemble CLG 
1050 PROCpoints 
1960 PROClines 

1070 distance%=5ØØØ 
1080 diststep2-500 
1999 anglestep-PI/16 
1100 REPEAT ; 
111@ PROC 2D. 

1128 PROCdraw 

1138 PROCupdate 

1148 PROCrotate 
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30 DATA 5,500,500,0,—500,500,0, 
-500,—500,0,500,—500,0,0,0,500 

40 DATA 8,1,2,2,3,3,4,4,1,5,1, 
57275737574 


Type in these lines instead of all 
other lines up to 99Ø and run the 
program. 


If this doesn't make sense to you, 
compare them with the data statements 
calculated above for the square. 
Refer also to the picture of the 
pyramid accompanying this article, to 
see how the axes would pass through 
it. The co-ordinates of the "corners" 
are also indicated. 


FORMULAE. 


For those people interested in the 
calculations used to perform the 
rotation, James has given the 
following formula. To calculate the 
new X and Y co-ordinates following a 
rotation about the Z axis by an angle 
of psi: 

Xnew-Xold*Cos (psi)-Yold*Sin(psi) 
Ynew=Yold*Cos (psi) +Xold*Sin (psi) 
and so on for the other axes. 


1158 UNTIL FALSE 
1160 END 


1180 REM Error trap 
1198 MODE 7 


1200 IF ERR<>17 REPORT: PRINT " at line " 


1218 *FX 4,0 
1220 END 


1240 DEF PROCassemble CLG 
1250 REM Fast CLG routine 
1260 DIM P$ 25 

1270 [ OPT 2 

1280 . CLG LDA 40 

1298 LDX £0 

1300 LDY 440 

1318 .loop STA &5800,X 
1320 INX 

1330 BNE loop 

1348 INC loop42 
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1410 ENDPROC 1830 REM Rotate about X axis ? 
1429 1849 IF key=138 THEN phi=anglestep 
1430 DEF PROCpoints 1850 IF key=139 THEN phi=-anglestep 
1440 REM Dimension point arrays and r 1860 REM Rotate about Y axis ? 
ead in points data 1878 IF key=136 THEN theta=anglestep 
1459 READ points$ 1888 IF key=137 THEN theta--anglestep 
1460 DIM X(points$),Y(points$),Z(poin 1890 REM Rotate about Z axis ? 
ts%) ,X2D(points%) , Y2D (points%) 1900 IF key=13 THEN psi--anglestep 
1470 FOR count%=1 TO points% 1919 IF key-93 THEN psi-anglestep 
1480 READ X(count%) ,Y(count2) ,Z(count 1920 REM Change viewing distance ? 
3) 1930 IF key=127 THEN distance%=distan 
1498 NEXT count3 ce$4diststep$ 
1500 ENDPROC 1948 IF key=135 THEN distance%=distan 
1510 ce$-diststep$ i 
1520 DEF PROClines 1950 ENDPROC 
1530 REM Dimension line arrays and re 1968 
ad in lines data 1970 DEF PROCrotate 
1540 READ lines% 1988 IF phi<>Ø THEN PROCXrotation 
1550 DIM start$(lines$),end$ (lines%) 1999 IF theta<>Ø THEN PROCYrotation 
1560 FOR count$-] TO lines% 2000 IF psi<>Ø THEN PROCZrotation 
1570 READ start% (count?) ,end$ (count£) 2010 ENDPROC 
1580 NEXT count$ 2020 p 
1590 ENDPROC 2030 DEF PROCXrofation 
1609 2040 REM Rotate about X axis 
1610 DEF PROC 2D 2050 Cosphi-COS (phi): Sinphi=SIN (phi) 
1620 REM Convert to 2-D 2060 FOR count$-] TO points$ 
1638 FOR count%=1 TO points$ 2070 Y=Y(count%): Z=Z(count$) 
1648 X2D(count$)-X (count?) *2590/ (dist 2080 Y(count%)=Y*Cosphi-Z*Sinphi 
ance$-Z (count$) ) 2898 Z(count%)=Z*Cosphi+Y*Sinphi 
1650 Y2D(count$£&)zY(count£)*2500/ (dist 2100 NEXT count% 
ance$-Z (count) ) 2119 ENDPROC 
1660 NEXT count’ | 2120 
1678 ENDPROC 2130 DEF PROCYrotation 
1680 2140 REM Rotate about Y axis 
1690 DEF PROCdraw 2150 Costheta=COS (theta): Sintheta=SI 
1700 CALL CLG N(theta) 
1718 FOR count%=1 TO lines% 2160 FOR count%=1 TO points$ 
1720 MOVE X2D(start%(count%)) , Y2D(sta 2170 X-X(count$): Z-Z(count$) 
rt$(count£)) 2188 X(count%)=X*Costheta-Z*Sintheta 
1730 DRAW X2D (end% (count£)) , Y2D (endg ( 2198 Z(count%)=Z*Costheta+X*Sintheta 
count$) ) 2200 NEXT counts 
174@ NEXT count 2210 ENDPROC 
175@ ENDPROC 2220 
1760 2230 DEF PROCZrotation 
1778 DEF PROCupdate 2240 REM Rotate about Z axis 
1788 phi-0: theta=Ø: psi=Ø 2250 Cospsi-COS(psi): Sinpsi-SIN(psi) 
1790 REPEAT 2260 FOR count%=1 TO points$ 
1800 *FX 15,90 2270 X-X(count£): Y=Y(count$) 
1818 key=GET 2280 X(count%)=X*Cospsi-Y*Sinpsi 
1820 UNTIL key=13 OR key-93 OR key=12 2298 Y(count%)=Y*Cospsi+X*Sinpsi 
7 OR key=135 OR key=136 OR key=137 OR 2300 NEXT count$ 


key=138 OR key=139 


231Ø 


PROGRAM LENGTH 


To find how long a program is when you have saved it to tape, print the decimal 
equivalent of the last four figure hex number that appears on the screen. Dylan 
Reisenberger. E] 
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s P | | | 
508 Mid YP SQUARE DANCE («6k/32k) 
"T gt by Martin Richards 


This program displays a series of expanding and contracting rectangles which 
change colour during the course of execution. The actual ‘form’ of the patterns is 
random and therefore a number of runs will display different patterns. Some patterns 
repeat after a while, whilst others appear to keep on changing, giving a rather nice 
display of coloured graphics. 


The commands GCOL and VDU19 (see BEEBUG no.9, p.3) are used to good effect in 
producing the many colours supplied. Some interesting fringe patterns are also 
Produced if you watch the output on a monochrome Tv, especially if you try it in 
MODE 1. If you have a 16K machine, you will need to alter line 29 to MODE 4. 


PROGRAM ANALYSIS 


*3Ø Gets rid of the blinking cursor (!) 

*4g — Puts the graphics origin at the centre of the screen 
*5(j Selects the initial height and width of the rectangle 
*6g Selects the speed at which the sides are to change 
*7Ø Selects the initial colour 


*8Ø to 15ø Main Loop (press ESCAPE to stop) 
*9Ø to 118 Draws any particular rectangle 


*12Ø Chooses the next width and height 
*13Ø If rectangle is too wide then change direction and colour 
*14Ø If rectangle is too high then change direction and logical colour 
 1Ø ON ERROR GOTO 16Ø 118 DRAWX,-Y:DRAWX,Y 
20 MODE 1 120 X=X+DX: Y=Y+DY 
30 VDU23;8202; 0; 0; 0; 130 IFABS(X)>64Ø THEN DX--DX:C-RND(3) 
40 VDU29,640; 510; 149 IFABS(Y)>51Ø THEN DY=-DY:VDU 19, 
5Ø X-0:Y-0 RND (3) ,RND(7) ;Ø; 
60 DX=RND(5Ø) :DY=RND(5Ø) 150 UNTIL TRUE=FALSE 
78 C-RND(3) 160 MODE 7 
88 REPEAT mM 170 REPORT :PRINT" @ line ";ERL 
90 GCOL 3,C 188 END 


190 MOVEX, Y: DRAW-X , Y: DRAW-X , -Y 
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by Gareth Suggett 


Gareth starts what we hope will be a long running series of puzzles for you to 
delve into. Many, like the one below lend themselves to a computer solution. There 
are no prizes because most of the puzzles will be investigative in nature, rather 
than having a unique correct solution. | 


emm m'a m h 9 n å 


I am sure that you will have as much fun programming solutions as I have had, So 
here goes with the first of the series: | 


This puzzle originally appeared under this title in the now-defunct magazine 
"Games and Puzzles" in 1974. It is also discussed under the title "The pole of a 
number" in Rade and Kaufman's "Adventures with your pocket calculator", 


Pick a 4-digit number. Generate a new 4-digit number as follows: Form the 
largest number that can be made from the digits of the original number and subtract 
from it the smallest such number. For example 

| 4818 becomes 8841 - 1488 
Repeat the process on this new number: 
7533 - 3357 


7353 


4176 
and so on: 
| E 7641 — 1467 = 6174 
Further iterations continually reproduce 6174. Show that this same number is 
reached whichever 4-digit number is chosen initially. 


For 5-digit numbers the process does not lead to a unique final number (pole) but 
ends in one of three cycles. Complete results are also known for 6 and 7-digit 
numbers. Find these and investigate the problem for numbers of 8 or more digits. 


PROGRAMMED CAPS-LOCK AND SHIFT-LOCK M 
Howard Spurr writes concerning software control of the CAPS-LOCK and SHIFT-LOCK 
functions and light-emitting diodes (LED's). Software control of these functions is 
required in such things as keyboard tutorial programs. The data is the same whatever 
OS is used, but the RAM address will differ. 
For OS @.1 the following will work: 
?216-&10 Shift lock 
?216-&20 Caps lock 
?216-&30 Lower case 
For OS 1.@ and 1.2 the relevant address is 602 (decimal). It is quite easy to 
scan the lower memory for an address that contains the above data in the appropriate 
modes. | 
If data is read at this address it will give the state of the SHIFT key (&#8 
added to above data), and the CTRL key (&40 added). Note that these routines will 
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SILENT GAMES | 


On the new series 1 operating system the 'effects' call *FX21Ø,1 will turn the 
speaker off, so now you need not listen to all those crazy tunes and bangs that 
drive you insane. Note that you can switch the speaker on again by using *FX21Ø,Ø. 


[There are many other goodies in the new 1.2 OS - see the relevant article elsewher 
in this issue. Ed.] | 
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There are many printers available on the market and it is not always easy to know 
which one would most suit your requirements. In this review we take a look at four 
printers. In each case the reviewer has been using the printer for some time in 
conjunction with a BBC micro. The models concerned and respective reviewers are: 


Printer Type Approx/Cost Reviewer 

a) SEIKOSHA GP-100A Dot Matrix £200 Adrian Calcraft 
b) EPSON MX80/MX1 00 Dot Matrix £320 / £430 Sheridan Williams 
C) OLIVETTI PRAXIS 35 Daisywheel £459 Graham Geatrix 

d) TANDY CGP-115 Pen plotter £149 . Rob Pickering 


The EPSON and SEIKOSHA models are matrix printers (ie. the characters are made up 
of a matrix of dots). The PRAXIS is a daisywheel printer giving true letter quality 
print but no graphics, and the TANDY CGP is really a pen-plotter which can generate 
text and graphics in four colours. 


Even if you are primarily interested in just one of the given printers you may 
find it useful to glance over the other reviews. When purchasing a printer have a 
good look through the adverts - prices do vary and so does the service backup. 


SEIKOSHA GP-1@9A 


At a retail price of around £299, 
the GP-1ØØA is one of the cheapest 
full size printers readily available 
for use with the BBC micro.  Seikosha 
also make a smaller printer, the 
GP-80A, which is slightly cheaper, 
and have recently introduced the more 
expensive GP-250X. | 


The BBC in conjunction with ACORN 
are selling the 80A and 100A under 
their own name. These are identical 
to the Seikosha printers. 


The 100A uses a "tractor feed", 
which means that special paper with 
holes along the edges is required. 
This is no problem to get hold of and 
is relatively cheap. It does mean however that standard A4 sheets cannot be used, 
unless an add-on friction feed unit is also purchased. The paper holders on the 
printer are movable enabling the use of varying widths of paper from 4.5 to 19 
inches. The listing paper must be stored directly behind the printer to ensure 
correct feed. This does not allow the paper to be trailed over the table to a box 
out of the way on the floor. Having observed this I have only encountered one or two 
misfeeds in some five months of using the printer. 


The printing method used is ‘impact dot matrix' producing characters on a 5x7 
matrix, the actual size of which is 2.11 x 2.82 mm. The characters appear clear 
presenting no readability problems. The character set, consisting of upper and lower 
case characters, numerals and symbols totals 116. The maximum number of character 
columns is 88, the spacing being 18 chars. per inch. Unfortunately the 1ØØA does 
not print "descenders", ie. lower-case letters such as 'p' 'g' and 'd' are raised 
Slightly above the print line to enable the "tail" of the letter to be included, 
(see lower case printout). : 
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Tandy CGP-115 
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Å switch on the machine enables the choice of one of four country character sets. 
This option allows the printing of special characters such as the German umlaut. The 
four settings available are USA, UK, Germany and Sweden. Double width characters are 
available and are enabled with the VDU 1,14 instruction. A sample of these is also 
given. The printer is quite noisy although not uncomfortably so, the plastic dust 
cover also acting as an effective baffle. The printing speed is 30 characters per 
Second (cps), printing taking place only from left to right. 


Graphics printing using special routines, such as the one published last month, 
produces good definition, with up to 480 columns across a sheet. The printer uses 
the parallel Centronics interface, and can be used by model B s or model A s with 
the printer upgrade. A serial interface may be purchased if desired. 


As a tool for programming, a printer is invaluable. The 100A supplies many of the 
features of more expensive machines and produces good legible copy in both character 
and graphics modes. It is easy to use, relatively cheap, and I have had no problems 
with it so far. Having said this however, I would have reservations about using the 
printer to produce, say, documents to use in a commercial environment. 


EPSON MX80/MX]90 


The Epson range of printers seem 
to represent very good value for 
money. This is why they are so 
popular amongst hobbyists, 
schools/colleges, and businesses. 


Two of the range are reviewed 
here, the MX80-III and the MX1@@-III. 
They can be obtained from a variety 
of dealers and you could expect to 
pay approximately £329 and £430 
respectively. Serial interfaces, 
with or without extended buffers, 
can easily be obtained, but cost 
extra. As standard the printer comes 
only with a Centronics interface. 
Machines can usually be supplied with 
a ready-wired cable for the Beeb at around £15 to £20 extra. 


MX80 


There is no need to review both printers in detail as they are very similar 
indeed. The MX1ØØ has a wider carriage and will take paper up to 15.5 inches wide, 
as opposed to the standard 9.5 inches on the MX8Ø. Also the MX1ØØ has a print speed 
of 100 cps, as opposed to the MX80's 80 cps. If you buy the 'FT' models, rather than 
a simple 'T' type, then the feed can be either traction or friction operated, ie. 
'FT' models will accept standard paper as well as holed listing paper. 


The printers are relatively quiet, and steady in operation. You can even keep 
writing on the same table when the printer is printing. The EPSON print heads are 
very cheap and easy to replace when they wear out, which is NOT quickly. A plastic 
cartridge holds the ribbons and these are also easy to replace. In fact the printer 


is extremely well designed in terms of cost of maintenance and replacements. 


The printed characters are of reasonably good quality with lower case descenders, 
and in these respects the Epson scores heavily over the SEIKOSHA reviewed above. 
Indeed, when printing in emphasised print with a new ribbon the quality is very good 
indeed. The formation of the characters is done with a 9-wire matrix head. 


known as ‘normal’, 'condensed', 


There are three main character sizes, 
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'enlarged'. There are also 'emphasised', ‘double’ and ‘underlining’ modes. Most 
of the options are selectable at the same time, for instance you can select 
'emphasised enlarged underlined' if you wish. In this way you can select any one of 
8 different character fonts, as displayed at the end of these reviews. All 
selections are made in software — ie. by just sending an appropriate VDU code. 


Next on the Epson's repertoire is the capability to select either 'Normal' or 
'Dual-density' bit image mode. These are used to obtain graphics printouts. [Please 
see BEEBUG no.9, p.10 for a screen dump program to achieve this]. 


When used with the Wordwise word-processing package it is fairly simple to define 
keys to set up all the styles of printing. You can even select both the pound and 
the hash sign in the same document. Similarly you can select crossed and  uncrossed 
zeros. Unfortunately when changing character sizes the line lengths become 
confused. 

Finally there is also a group of built-in foreign character sets. These are 
either software or hardware selectable. 


OLIVETTI PRAXIS 35 DAISYWHEEL 


You can't afford more than £500. 
You would like letter quality print, 
high speed printout and graphics 
capability. Sadly, you can't have 
all these features, and must settle 
for a compromise. Matrix printers 
have every conceivable facility 
except letter quality print. 
Daisywheel printers produce perfect 
print but are slow, have no graphics 
capability and more limited character 
sets. You will have to decide on 
your priorities and purchase 
accordingly. 


For under £450 you could buy a superb matrix printer like the Epson MX100 FT 
III. The print is good and there are many 'styles' but they still retain a 
"building brick" structure. On the other hand, there is a vast array of characters 
available and any non-standard characters can be programmed from your computer. 


Finding a daisywheel printer and lead for under £450 including the dreaded VAT is 
quite a problem. Kram Electronics produce a Centronics interface, including a BBC 
version, for the Olivetti Praxis 35 electronic daisywheel typewriter. It costs 
under £500 all in. Its print quality is equal to that of the more expensive 
dedicated daisywheels. A switch on the interface enables control of the printer to 
pass from the computer to the printer keyboard. There are clearly other suppliers of 
the Praxis, who may provide even better terms. 


The printer doubles up as a high quality portable typewriter, and need not stand 
idle when the computer is switched off. It comes with two daisywheels, one with 
all the characters shown on the BBC keyboard except square brackets, curly brackets, 
up-arrow and tilde. Other wheels can be purchased in a variety of type faces 
including a special symbols wheel. It has a strong and neat carrying case but only 
one carbon ribbon cartridge. A carbon ribbon produces really superb quality print 
but costs £2 a time and lasts for 40000 characters or about 20 pages of closely 
packed A4 text. Nylon ribbons give ten times more print than the carbon variety. 
Each A4 sheet of print costs between a halfpence and one penny. The print quality 


is beautiful and vastly superior to anything that even the best matrix printer can 
produce. m" | 
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The print speed is about eleven characters per second - about as fast as a good 
typist but less than half the speed of the MX8Ø on its slowest mode. An A4 sheet 
containing 3000 characters will take between six and seven minutes. A listing will 
take three minutes for a fifty line program. 


The Kram interface is in a separate box measuring 12 x 20 x 6 cm. The printer 
has an area of 44 x 36 cm and varies in depth from 3 cm at the front to 12 cm at the 
back. It is a lot noisier than the Epson but a perspex cover can easily be made to 
cover the machine and this reduces noise to an acceptable level and keeps dust and 
little fingers at bay. 


If your printer will spend most of its time producing listings, but letter 
quality print will be of paramount importance for all its other tasks, then the 
Praxis is a very good choice. There are rumours that the matrix printer will 
eventually spell the demise of the daisywheel, but this could be a long time 
coming. Other daisywheel machines will soon break the £500 barrier, but make sure 
that when a key is pressed on the BBC machine, the correct symbol is going to be 
produced by the printer. 


TANDY CGP 


The Tandy CGP (Colour Graphics 
Plotter), as its name suggests, 
differs from conventional printers. 
Unlike the daisywheel or dot-matrix 
printers it does not print from a 
ribbon, but actually draws the 
characters or graphics using 
miniature ball-point pens on to plain 
paper. Text and graphics can be 
plotted in up to four colours - 
black, blue, green, and red - and the 
plotting commands for the graphics 
are compatible with the BBC graphics 
commands. 


The cost is £149 and it can be obtained from any TANDY outlet. If you can prove 
that you are a teacher (ie. in education) then there is also a discount awaiting 
you. It has two interfaces, a Centronics interface which is compatible with the BBC 
printer port, and a serial (600 baud) interface which is not compatible with the 
Beeb. It is a compact printer with dimensions of 210x216x75mm, weighing only fØ.8kg. 
The complete package consists of the printer, a separate power supply, one roll of 
paper, 1 set of three black pens, 1 set of three coloured pens, and a user manual. 


The main disadvantage of the plotter is the width of the paper, which at only 
about 115mm is about half the width of an A4 sheet. To offset this disadvantage I 
must point out that the maximum number of printed characters across the width is 89, 
and they're very readable too! 


Controlling the printer is easy. You can list to it the same as any other printer 
when it is in text mode, but you may also place it into graphics mode by sending an 
ASCII code 18 to it. This is most easily done with VDU1,18. Whilst in graphics mode 


you may still print text, but in addition there are a large number of commands 
available to control movement of the pen. 


All the commands start with a capital letter, some of which are followed by a 
number sent as characters - not as binary e.g. VDU2:PRINT"D1ØØ,2ØØ":VDU3 would 
"Draw" a line from the current pen position to position 100,200. Very simple. By 
sending each character to the printer only (using VDUl,n) you avoid printing all the 
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commands on the screen at the sam time as controll 


ng is way, you 
can issue an instruction to the printer which corresponds to each PLOT, DRAW, or 
MOVE command drawing the same picture on the screen. You can also use the colours, 
though you only have four, and there are no flashing colours! The command: 


VDU2: PRINT"C1":VDU3 would select the colour blue, while "C2" would select green and 
So On. . 


Because there are so many commands I will not describe them all here. Suffice it 
to say that there are plenty to choose from, they are easy to use, and they provide 
many varied functions. You can even tell it to plot axes via a single instruction. 


There are 480 plottable points in the x direction, and the y is unlimited, though 
effectively -999 to 4999 from a current position. The paper moves either up or down 
with equal ease. Because of the width, a full BBC screen size is not quite 
achievable, though by swapping the order of x,y values in the commands, you get an 
actual size of 999 by 480. since the BEEB screen has 512 actual points in the 
y-direction at best, the loss is very rarely ever noticed. 


Å very good easy-to-follow manual is supplied with the printer, though all the 
test programs within it are designed to work on a Tandy computer. It is easy to 
convert these to BBC Basic by using a procedure to replace the Tandy Basic  LPRINT 
command which sends output to the printer only. The manual does NOT give connections 
for the Beeb, but an absolutely standard BBC Parallel interface lead is all that is 
necessary for full operation. 


Personally I would try to award this printer more than full marks; I haven't seen 
anything so good as this since I got a BBC micro. The paper is only just over £1 per 
roll, and having used this printer for heavy tests for hours on end for 6 weeks I am 
about 2/3 through the original roll of paper. Replacement pens are only £1.70 for 
three, and each of those lasts for 250 metres according to the manual, and I've 
used up two. Å | | 


We are grateful to Mr Graham Pinder for initially introducing us to the  TANDY CGP 


Information has just been received stating that KRAM Electronics Ltd., the 
supplier of the Praxis mentioned above, have gone into liquidation. There is, 
however, no shortage of suppliers of this machine. We recently contacted two, 
DATARITE TERMINALS Ltd of ESSEX and SIMMONS MAGEE COMPUTERS Ltd of  TWICKENHAM, and 
both stock the Praxis together with a suitable interface. 


STOP PRESS STOP PRESS 


PLANETOID RESTART 


Stelios Charalambides writes - "have you ever lost your game of Planetoid because 
you pressed the BREAK key, or for some other reason? Reloading is a pain because of 
the slow cassette system. The solution is very simple. 

Once the program is loaded, or before you start loading, define a free key thus: 

*KEYOVDU22,2,23;11;0;0; 0; Ø:CA.&1CØØ|M l 

When the program becomes lost or crashes, and as long as the memory is not 

erased, you can restart the program by pressing the above defined key". 
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WHAT TO DO WITH 
By David Graham 


and M. E. Horton | 


The new 1.2 operating system is now available, either m BEEBUG - see this 
issue for details, or at Acorn dealers; and new machines are currently being 
supplied with 1.2 already installed. To find out what system you have, type *FXØ 
«return», We have suggested that 1.2 is well worth having; and this month we look 
briefly at some of the features that it offers. 


BUGS FIXED 
Most importantly, the following bugs have been fixed: 

l. The cassette filing system block zero bug. 

2. The cassette data handling problem with PUT & GET byte. 

3. The bugs in PLOT routines that cause odd things to happen on the bottom 
right of the screen have been fixed. 

4. OS 1.2 will support "paged" ROMS - though if you have a Model A without an 
official upgrade, then see the article on ‘Upgrading Model As to read 
paged ROMs in this issue. 


ENHANCEMENTS 
The 1.2 operating system carries a considerable number of enhancements, many of 
which are also available on 1.0. 

1. New PLOT commands incorporating fill routines - PLOT instructions 72-79 
and 88-95. See BEEBUG no. 6 p.10 for further details. 

2. The ability to use the «shift» key in conjunction with the user keys to 
produce coloured and flashing text characters in mode 7, or with the 
<ctrl> key to produce coloured graphics characters in mode 7. E.g. press 
«shift» & function key 5 simultaneously then any other characters - they 
will appear in cyan. Press return then press <ctrl> and function key 3 
simultaneously then any number or lower case letter, this will generate 
teletext graphics symbols. 

3. A cold start is actuated by «ctrl» «break» rather than «break» «break» - 
ie. press <ctrl> and «break» simultaneously. 

4. The introduction of a host of new *FX and OSBYTE calls with a variety of 
functions. 


NEW *FX AND OSBYTE CALLS 

Many of the new calls are documented in the User Guide, and on pages 418 and 419 
a summary of FX calls is given with an indication as the whether they are new to 
series one (ie 1.0 or 1.2 etc). In what follows, we will draw your attention to 
some of the more interesting of these, and then give a summary of SOME of the new 
undocumented calls. 


DOCUMENTED *FX CALLS 

"| *FX18 Reset user defined function keys. We put this in a Hint last month. The 
call clears the user defined key buffer. This is particularly useful, since 
redefining a previously defined key can give a 'keys full' message because 
the old key definition is not erased before the space check is made. You 
can of course empty each key individually with *KEYØ etc, but this is 
laborious. 

*FX2Ø Explode soft character RAM allocation - this allows all characters to be 
redefined. See User Guide p427. 

*FX2] Flush selected buffer. A useful call to enable queues in selected buffers 
to be deleted, including the keyboard buffer, the RS 423 buffer, the printer 
output buffer, the four sound channels and the speech synthesis buffer. To 
illustrate the use, it is a good idea to execute *FX21,Ø (flush keyboard 
buffer) before reading ak Mid seer with a GET, since any keyboard pr 
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*FX]38 


*FX]46 
-151 


*FX225 
-228 


before the GET would otherwise be stored in the buffer, and given out to the 
GET command. Alternatively use *FX21,0 at the end of a game, and before 
asking "ANOTHER GO ?" - otherwise the answer will be the last pressed key - 
eg "Z" for move laser base left etc. | 
Insert character into keyboard buffer. See U.G. p.433 for syntax. By using 
this call you can make a program issue commands at the end of execution that 
are not normally allowed from within a program. E.g. the command NEW. The 
program below achieves this. If you run it, at the end of execution - ie 
after line 88 has been printed, NEW will appear on the screen, and the 
program will be erased. The data sent in the FX call are the ASCII codes 
for the required buffers (see U.G. p.486). The 13 is a carriage return 
character. 


10 PRINT"TO EXECUTE NEW" 50 *FX138,0,69 
20 PRINT"WITHIN A PROGRAM" 60 *FX138,0,87 
30 PRINT"USING *FX 138" 70 *FX138,0,13 
40 *FX138,0,78 80 PRINT"THE PROGRAM HAS GONE" 
Execute reads and writes to memory-mapped input and output devices - eg the 


video ULA, user port etc. Without these *FX calls, the only way to use the 
user port (see BEEBUG no.3 pp. 8-10) is to POKE and PEEK, which is 
undesirable because it means that such programs will not work across the 
Tube. See User Guide pp. 435-437 for further details. 

Set the base number for function key codes. This can be extremely useful. As 
well as being able to store command strings and the like, the red function 
keys may also be used to generate a range of ASCII character codes. Good use 
has been made of this in that if you press «shift» and any function key 
simultaneously (not zero), you will generate an invisible Teletext code (if 
you are in mode 7), and any further characters typed will be either in 
colour or flashing. If you use <ctrl> and a function key, then the lower 
case letters will produce coloured graphics characters in mode 7. Try <ctrl> 
f3 (simultaneously) followed by "y" for example. Simultaneously pressing 
<ctrl> and «shift» and a function key produces a further range of codes. The 
*FX calls 225-228 allow you to change the range of codes generated. For 
example, if you execute *FX228,246, then <ctrl> «shift» fø will put 
character 246 on the screen, f] will give you 247, and so on up to f9 which 
will give 255. You can define each of these to produce whatever character 
you wish in all modes but 7, using the VDU23 call. 


UNDOCUMENTED *FX CALLS 


*FX196 
*FX197 
*FX21Ø 


*FX219 


*FX220 


*FX236 
*FX237 
*FX245 
*FX246 
*FX247 

-249 
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Period before auto-repeat on keyboard starts (as set by *FX 11). 

Frequency of auto-repeat (as set by *FX 12). 

Cancel sound output. *FX21Ø,1 turns off the sound generator, *FX21Ø,ø turns 
it back on. | | 

Redefine function of Tab key. *FX219,49 sets it to ASCII character 49 (=1), 
*FX219,12 will make it clear the screen. *FX219,9 resets it to a normal tab 
function. It can be used in conjunction with user defined characters (see 
"Accented Letters’ in this issue). 

Read or set the ASCII character which gives 'Escape'. The default value is 
27. If you execute *FX220,48, then pressing zero will execute an escape. 
*FX220,0 will disable the keyboard escape. 

Destination for output, as set by *FX 3. 

Cursor edit state (as set by *FX4). — 

Printer output destination, as set by *FX 5. 

Printer ignore character, as set by *FX 6. 

After the user has pressed «break», the operating system looks at three 
locations in page two to find out what it should to. Normally, these bytes 
contain zeros, and the machine ignores them. Using these three calls, you 
can insert machine code instructions into these bytes. When  "«break»" is 
pressed, the operaeing system will then jump to the first of the locations. 
As there are three bytes available, there is room to insert a JMP 
instruction. For example, to make the machine execute a routine which is at 
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ress &DØØ after you press «break», 

*FX 247,76 (JMP instruction) 

*FX 248,0 (low byte of address) 

*FX 249,13 (high byte of address) 

If you want to return to normal OS break handling after your own routine has 
been executed, your routine should end with an RTS instruction. The effect 
of these calls is not reset by «control» n «break». 

The number of the sideways ROM entered after <break>. 

Returns the type of the last reset to occur. X=Ø if «break» was pressed; 
x=] if the last reset was power up; X-2 if «control» and «break» were 
pressed. (See also OSBYTE note at the end of this article). 

If used in read mode, returns &8@ on a 32k machine and &4@ on a 16k machine. 
In write mode, this provides a means to mimic a 16k machine on a mode B. Try 
*FX 254,&40 then press «control» and «break» together on a 32K machine. 
After this, you should get 'BBC Computer 16k'. It provides an easy way of 
making sure that your programs will run on both models. The call seems to 
work on a series 1.0 S and is reset by *FX 254,&80. Data of 255 and Ø seem 
to work just as well, and are easier to remember. 

Read or set startup options. The eight bits of this byte correspond to the 
links on the bottom right-hand side of the keyborad PCB which are used to 
select the screen mode entered after a reset, and to select some disc 
options. In write mode, you can use this call to change these options. For 
example, to make the machine enter mode 3 when you press «break»: *FX255,25] 
(251 - 11111911 binary) and to get back to mode 7 after «break»: *FX 255,255 
The last three bits of the second argument give the screen mode to be used. 
Again, this call works on OS 1.@.<control> «break» resets this byte to the 
value determined by the PCB links. The effect of the disc links was given in 
BEEBUG no.9 p.8. These can also be simulated with this call. 


OSBYTE CALLS j 
All of the above *FX calls can be executed from machine code as an OSBYTE call. 
FX calls do not return a value (FX Ø is an exception), to do this the equivalent 


OSBYTE 


call must be made (see User Guide p.429). FX 253 is a read-only call, so 


there is little point in using this; OSBYTE 253 should be used to read the type of 


reset which last occurred. 


If you try to draw a triangle whose apex is in line with its base you get a very 
odd effect. This bug was referred to by J Yale in his ARTIST program in the 
December/January issue of BEEBUG. The following will show the bug: 


The bug does not exist in the series one OS. 
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18 MODE 4 40 DRAW 700,800 
20 FOR I=1ØØ TO 7909 50 PLOT 85,50,800 
30 MOVE I,809 60 NEXT 


Tim Powys-Lybbe. 


KDE DK DE DE DK 0 Oo 6 0 0 8 0 4 0% © 0 0 aE 9 9 € 6 $ O 6 O6 € 9 0 O 0 € G O O 6 O O 6 O O O G O 9 à O O O € O O 9 6 O O € O 6 O O 6 O O O O 6 O OHS ESOL O O 9 € O € O € O € € O O 9 € € € O O 6 9 € & 0009 00000909090 09 O 099 0 * 0 00 
942494596555 054* 5*9 05055954954, 9,959 9,999 9,9,0,9, 9,0 e 0 076-0 0.0 0:0-0 070.070 0707070 070 8^0 0 9 0 0 0 6 9 2 6.0 0 4 6 6 0 9 0 9 0 D € O 9 6 0 9 0.0 0 6 0 9 0 0 9 6 9 0 4 t 0 0.0 9 0 0 09 99 0 9 9 9 € 0 0 
Cae SIC Pera Ore IC I IO OR re een Oro 0 a ence ora oro o o o 0 0^6 9 575 e 057554 NP 59,555,745, ,* 45955,5949, 9, ,9 9, ,5,, 4,49, 9, , 5, , 5, , 49,4, 5, 55, 9, , 5, 5 9 49, S, un TI i OO 


»09090099*099* »^cansa000202€0640092094090€09000000096096000009090€0€000200090000292028 009000 € € € 6 » à ne o 9 o0 0 0 906909 0 099 6000€ 090 0060 9 0 00 « » 9 € O0 6 0 9 € * 0 Qe 0 9 9 € 0 O € 0. O OQ €.0O. O 0 


BASIC ROM BUG 


David Wright tells us about a bug in the BASIC ROM (issue one) which a friend of his 
uncovered. The routine for DIMensioning arrays does not check for 'silly' arguments. 
Hence DIM A (n*256-1,n*256-1,.....) produces some interesting results. For example 
DIM A (8191,8191) doesn't just crash the machine, it kills it stone dead - even the 
cursor vanishes. Some other (impossible) values are accepted, and you can print out 


the values in the array. 
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by Colin Opie 


EN 


When you have a series one operating system (1.Ø or 1.2) your computer should be 
able to use the 'paged ROM’ facility. This means that you can plug in ROM-based 
software (such as a word-processor or a disc-filing-system) into any of the three 
spare sockets 88, 100 and 101 below the keyboard on the right hand side of the 
machine. However if you have a model A which has not received a full official 
upgrade it will probably need some hardware modifications to activate the paged ROM 
facility. The best way to check this in the first instance is to proceed as follows: 


1. Unsuitable ROM Decoding - 


A simple check for this condition side of the case) is the one which 
is to put the Basic ROM in one of will be selected on a cold-start. 
the three sockets 88, 100 or 191 For example, there is no reason 
mentioned above, and see whether why you should not get your 
or not the computer is capable of machine to always start-up in 
recognising its existence. If it Wordwise, and only switch to Basic 
doesn't find Basic you will get (via *BASIC) when you want to. 


the error message ‘Language ROM?' 
e swit i : i C 
med ou. SWI Me Noche mach pe a 2. Wrong Link Positions - 


This effect is most likely due to 
the machine being a model A There are a number of moveable 


i : links in the BBC computer which 
t h thout f : 
rh po Ed e dn Run are pertinent to the task of ROM 


the ROM selection mechanism to the address gr. tee Rn virally 
model B specification. This important that each of these links 


upgrade can be achieved by are set correctly. 
inserting IC76 (a 74LS163) and 


å ; In the following table  'North' 
cutti links $12, S13. Both : dapes 
ed MUST pe performed - means that the link joins the two 
under no circumstances should the pins (out of a set of three) that 
machine be turned on with IC76 are furthest north, ud PORET the 
inserted and the links still Do. of t n board. East 
connected. IC76 is situated just o44ows the same. convention and 
behind the keyboard socket (near therefore refers to the two pins 
pin 1, the left hand side of the nearest the right-hand side of the 
Socket) on the main pcb. The board. "West' is clearly the 
links S12, S13 are in a similar opposite condition to 'East', and 
position, but near pin 17, the Fast-West' refers to the general 
right hand side of the socket. direction of the links (due to 


there only being 2 pins). 
With the above modifications you 
should find that the various 


Software ROMs (ie. Basic or 518 north 
Wordwise, but NOT the Operating S19 east 

System ROM) will be recognised in S20 north 

any of the three paged ROM S2] 2 x east-west 
Sockets. It is important to note S22 north 

that the ROM in the right-most S32 west 


socket (the one up against the S33 west 
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FILES (PAI 


VT 2) 
by Sheridan Williams 


Sheridan Williams continues his series on using files, and presents a general 
file-handling program which will work on cassette or disc, though which is best 
suited to the former. In fact all comments referring to cassettes in this article 
also apply to discs. 


In part one we concluded by saying that there were four solutions to the problem 
of updating a file. For those with a cassette player the best solution is the first 
one listed - load the file from cassette into an array, make all the modifications 
(including any additions) and then write the file back to cassette. This month I 
will discuss this solution and give an example program. This program will process 
the PEOPLE file whose record description we gave in part one. By process I mean 
that it will allow you to enter details about a particular person; you will be able 
to update that data; you will be able to save a copy of the file on cassette or 
disc. The program is listed at the end of the article. 


SIMPLE FILE-HANDLING PROGRAM | 
The program keeps the data file to be managed in an array, so we must first 

declare the size of the array for each of the fields that we wish to use. The 
appropriate dimension statements are:- 

18 nr=1ØØ 

20 DIM sur$ (nr) ,title$ (nr) ,sex$ (nr) ,dobS (nr) 
The variable nr in line 1Ø holds the number of records that the file will have. 
This makes it relatively simple to change the value of nr ata later stage if we 
require to. 


The whole program is built around the procedures PROCreadfile, PROCwritefile 
PROCaddrecords, and PROCprintcontents, and starts off (lines 80-300) by displaying a 
'menu' of choices and deciding which procedures to use depending on that choice. 
Let us assume that you choose option 3 - add records to the file. This is the most 
sensible one to start with as initially the file will not exist, and option three 

allows it to be created and filled. 

PROCaddrecords (lines 3000-3999) asks you which record number you are going to use 
(3040), if this is higher than any record used so far, it remembers it in the 
variable 'maxrec' (3045). It further checks that the record number is within 
acceptable limits (3050), and if the record already contains some data it will 
display it (3060) before asking you to enter the data (39079). 


PROCreadfile Read the file from disc/cassette into arrays in main store. 

PROCwritefile Write the file from the arrays in main store onto the 
cassette/disc file. 

PROCaddrecords Read records from the keyboard and put them into arrays in 
main store. | 

PROCprintcontents Display on the screen the contents of the file held in 
arrays in main store. 


Some of the procedures use a defined function 'FNfilename’ this simply returns a 
filename that it asks you to enter. 


PROCgetrecord uses a very useful technique, that if a 'null' field is entered it 
will hop back to the previous field. For example, suppose that you have just 
entered BLIGGS for the surname by mistake instead of BLOGGS, and you have pressed 
"return", the program now requests "Title?". If you just press 'return' the program 
will hop back to request the surname again. 


The variable 'maxrec' declared in line 30 (as maxrec-1) holds the highest record 
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actually used so far. It would be rather wasteful always to process all the nr" 
records that were dimensioned when perhaps most of them are not used. 
It might be a good idea to spend some time studying the program. It is not 


complicated, but it uses statements with which you may be unfamiliar. 
to extend the number of fields you would need to declare another array in line 29, 
as well as altering lines 2050, 4010, 5050, and extending PROCgetrecord 
appropriately. It would also be reasonably simple to add procedures for other 
routines such as searching and sorting. | 


If you wanted 


The program as presented has a severe limitation - it can only process the PEOPLE 
file with about 900 records in a 32k machine or about 250 records in a 16k machine. 
If you add any more routines to the program this will have to be subtracted from the 
amount of memory available to hold the file. The solution is to use discs; and we 
will take a closer look at discs next month. 


Errata: 


[In part ] I said that the last program would only read back 'Apple' from the file. 
This applies only to disc files because the operating system, sensing that the file 
has the same name when used in line 40 as when used in line 10, will use the same 


area on disc, hence overwriting the original data; whereas on cassette you can have 
Several files all with the same name]. 
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18 nr=1ØØ 

20 DIM sur$ (nr) ,title$ (nr) ,sex$ (nr 
) ,dob$ (nr) 

30 maxrec=] 

80 REPEAT:MODE 7 


1900 PRINT TAB(5,3)"PEOPLE FILE PR 
OCESSOR" 
128 PRINT'"1, Read a file." 
130 | PRINT"2, Write a file." 
140 . PRINT"3. Add records to the file," 
158  PRINT"4, Print contents of file.” 
168 PRINT"5. End the program." 
200 PRINT'"CHOICE? ?::choiceS$-GET$ 
210 IF choice$-"]" PROCreadfile ` 
220 IF choice$="2" PROCwritefile 
230 IF choice$="3" PROCaddrecords 
.240 IF choice$="4" PROCprintcontents 
300 UNTIL choiceS="5" 
999 CLS:END 
1000 DEF FNfilename 
1010 REPEAT 
1020 | INPUT''"Name of file (1-7 let 
ters) ",filename$ 
1830 UNTIL filename$>"" AND LEN (fi 
lename$) <8 
1948 =filename$ 
1999 
2000 DEF PROCreadfile 
2020 c-OPENIN(FNfilename) 
2030 rec=] 
2040 REPEAT 
2050 INPUTific,sur$ (rec) ,title$ (rec) 


,Sex$ (rec) ,dob$ (rec) 


2055 IF rec>maxrec maxrec=rec 

2965 rec=rectl:IF rec>nr rec=nr 
2070 UNTIL EOF#c 

2090 CLOSEfc:ENDPROC 

2999 

3000 DEF PROCaddrecords 

3030 REPEAT 

3040 INPUT''"Rec no (Ø to return t 


o menu) " ,rec 


3045 IF rec»maxrec maxrec-rec 

3050 UNTIL rec>=Ø AND rec<=nr 

3055 IF rec=Ø ENDPROC 

3060 IF sur$(rec)>"" PRINT"Record cu 
rrently contains:":PROCprintrec 

3070 PROCgetrecord 

3120 GOTO 3030 

3999 

4000 DEF PROCprintrec 

4018 PRINTsur$(rec)" "title$(rec)" " 
Sex$(rec)" "dob$ (rec) 

4020 ENDPROC 

4999 

5009. DEF PROCwritefile:LOCAL c,rec 

5030 c-OPENOUT (FNfilename) 

50480 FOR rec=] TO maxrec 

2050  PRINT#c,sur$(rec) ,title$ (rec) 
;Sex$ (rec) ,dob$ (rec) 

5060 NEXT rec 

5070 CLOSE#c : ENDPROC 

5999 

6ØØØ DEF PROCprintcontents:LOCAL rec 
6005 CLS 

6018 FOR rec-] TO maxrec 

6028 IF sur$(rec)>"" PRINT"Rec "sr 
ec; ":"; : PROCprintrec 

6030 NEXT rec 


. 6048 INPUT"Press 'return' for menu", Q$ 


6050 ENDPROC 

6999 

7000 DEF PROCgetrecord 

7010 INPUT'"Surname",sur$:IF sur$-"" 
ENDPROC 

7020 INPU "Title",titleS:IF titles=" 
" THEN 7916 i 
7030 INPUT" Sex" ,sex$:IF sex$="" THEN 
7020 

7040 INPUT"Date of birth" ,dob$:IF do 
b$="" THEN 7030 

7050 sur$(rec)=sur$:title$(rec)=titl 
e$:sex$ (rec) =sex$ :dob$ (rec) =dob$ 

7060 ENDPROC 
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3ASICS — TEXT AND GRAPH 
by David Graham 


D på 
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k ( å 
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Text Windows 


A text window is an area of screen where text may be printed. The default value 
of this on the BBC machine is the whole screen. This means that characters may 
normally be placed anywhere on the screen, by using the cursor keys or the TAB 
command; and when scrolling takes place, the whole screen scrolls. 


It is possible to reset this window to a rectangle of any size or shape (in whole 
numbers of characters) and to place it anywhere on the screen. This can be 
particularly useful in graphics modes, when you may wish to display and scroll text 
while keeping a picture or diagram stationary on the screen. Such a technique is 
used in BEEBUGSOFT's Superplot, where a full width window of only one line in depth 
Scrolls user information, and allows 
data input, while keeping the 
remainder of the screen for the 
display of the plotted functions. 


The command that makes this | MM d cu 
possible is a VDU 28 call. It is | p v7 o Cee oo 
documented on p. 387 of the User EM — w— ^—€ | 33 
Guide, and its syntax is as follows: 


VDU 28,leftX,bottomY,rightX,topY 


As an example: VDU 28,19,31,39,Ø 
would confine text to the right-hand 
half of the screen in mode 4. The 
scrolling window begins at 
character 19 from the left, and ends 
at no .39 (i.e. the rightmost 
position). The bottom line of the 
scrolling window is line 31, and the 
top line is line zero - hence the 
4 parameters in the call. Try 
issuing this command (once you are in 
mode 4), then listing a program. It 
will scroll up the right-hand half of 
the screen. Note that the scrolling 
speed is much slower than usual PE Text 
because the clever  fast-scroll Hindow 
technique used on the Beeb (hardware 
scrolling using the 6845 video 
controller chip) cannot be performed 
when windows are in use. If you want 
to create a similar window in mode 7, 
you will need to alter the 'bottom Y' 
figure from 31 to 24 (since there are 
only 25 lines in mode 7). It is 
worth noting that there is no error 
reporting on windows that overlap the 
Screen; incorrect commands are just 
ignored. FIG 1 


Bottom Y 


One clever use of the text window feature in mode 7 was given by Simon Wilkinson 
in BEEBUG no.6, p.30. It is ree of pi tee here. The object of Simon's 
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program is to give permanently coloured text and background in mode 7. He achieves 
this by printing the appropriate control characters at the start of each of the 25 
lines of the Teletext screen, and then shrinking the text window by three characters 
from the left so that the colour codes are not over-written, or scrolled away. 


10 MODE? 58 FOR Y = Ø TO 23 
20 N = 132 :REM Blue text 600 VDU B,157,N, 13,10 
30 B = 134 :REM Cyan background 70 NEXT Y 

4d CLS 80 VDU 28,3,23,39,0 


Another use of the text window is to allow small sections of text to remain on 
screen while the bulk of the screen is allowed to scroll. This technique is often 
used in word processors so that line length indicators and other information can be 
displayed against a scrolling screen of user-supplied text. The way to achieve this 
is to print the required permanent text at full window size, then reduce the text 
window so as to protect it. A similar technique could be used to provide permanent 
information about the contents of the user keys in say the bottom three screen 
lines. Again, if your objective is to combine small amounts of text with large 
graphical displays, then it is probably more useful to use scrolling windows of full 
Screen width, but only two or three lines high for example. Such cases call for the 
combined use of text and graphics windows. 


Graphics Windows 


The VDU28 text window call has a counterpart in graphics. This is the VDU24 call 


(User Guide p. 385). It is used in a similar way to VDU28, except that its range of | 


values corresponds to the graphics coordinates - (Ø — 1023 vertically, and 09-1279 
horizontally). The syntax is also 

broadly similar, but note the 

abundance of semicolons: 


VDU 24,leftX;bottomY;rightX;topY; 


Once you have defined a graphics 
window in this way, even if you issue | 
PLOT & DRAW commands covering larger Graphics 
areas of screen, only those areas Window 
within the graphics window will be 
affected. There is a variety of uses 
for this command, one rather 
interesting application is to use it 

as a fast fill routine for rectangles 
of any shape or size. The principle 
behind the technique is to define a : 
graphics window in the position of 1279 
the required filled rectangle, then 

clear the graphics screen to the | | 

desired colour. This is achieved by FIG 2 

changing the actual background colour from black to the required colour, so that 
when CLG clears the graphics area to the logical colour black, it actually puts a 
block of colour on the screen. 


pr 
& 
o 
søl 
ET 
e 
ga 


This technique will produce a coloured rectangle much more quickly than by using 


a pair of adjacent filled triangles (the commonly used technique for generating 
filled rectangles on the Beeb). Program one below gives a timing for the two 
methods. It first uses the Window Method. Line 80 defines the window, and line 90 
sets the physical colour of the background to red (see User Guide pp. 262 and 222, 
or BEEBUG no 9 p. 3 for further details). The command CLG then clears the defined 
window to the chosen colour. At this point a timing is printed out, the timer is 


reset, and the conventional block filling method is used to draw the same sized 
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block. This involves drawing a pair of adjacent triangles. The first three PLOT 
commands on lines 150 and 160 create the first filled triangle, and the second is 
generated by the remaining PLOT command. This is a particularly economical way of 
performing the operation, since it takes advantage of the fact that in producing the 
first triangle, the graphics cursor actually moves to two of the points on the 
second triangle (since the two triangles have two points in common). The final 
PLOT85 call on line 160 makes use of this fact to draw the second triangle. If you 
run the program as it stands you will get timings of around 17 and 26 hundredths of 
a Second respectively for the two methods, suggesting a considerable saving in time 
when using the window method. 


The two further programs represent brief doodlings with window-created 
rectangles. The first (program 2) creates random sized rectangles at random 
positions on the screen, while the second (program 3) produces a series of 
concentric squares which grow out from the centre. In both cases GCOL0,129 has been 
replaced by GCOL3,129. This latter achieves what is called “exclusive or" plotting, 
to create a more interesting effect. 


oe 0090 oo oe 9060€9020902 9 
DOGO 9" a0" 0 "0 "000" ee "08 '0 00° 0'0"0 "00" 0's 000-0" 0 6" 0-8-0000" E DE E E 0 # 0.0 0 6 6 #6 O00. 0 00,0 6.9 SCC COCHE) $7498 W 0.9/9 2.0.6 8 0.9 0:6 £8 0.9.9.0 9.009 9 94 6 09 48 4UUME RV et 
D DOOOQOOOOOOQOOOCOCCCOCGCC 6 0 6 OO DOE o4, *,9,9,9,9 9 9 o 0 e^ e. D 

ea" o* o * o^ ea". o*o o e o eee ote a e o e e e e o o o ce ce e 00e «0090009» 0€ 9 o9 0e c o «o c c e o o o a o c e n e c v c e e o e q o e e a o o o a e o a a o q o" ee a o AE oo. 


5 REM PROGRAM 2 

10 REM RANDOM BLOCK PATTERN 
20 REM USING WINDOW METHOD 
30 MODE5 

40 REPEAT 

50 REPEAT 

60 A%=RND (128) : B%=RND (1Ø24) :C$=RND ( 

128Ø) : D3=RND (16024) 

70 UNTIL A%<C% AND B%<D% 

80 VDU24,A$;B$;C$;D$; 

98 GCOL3, 129 
100 CLG 


,* 19,5, , 54,9, 59,9, tt tt ,,52919100:070700:0707070707077070707070707070707€ 0707074707073 070 0770707 e «7970 0^ 9707 
MK DK DK DE DE DKD ,*,2, 4, 9,9 0.0 € a ^0 90.0 
e^o" o^ a^ e^o o o ee tono o * 4 93e 9*4 4 475 ,* 4947594949 5*,* 45,949,549 ,,959 495949454949 4,9494 E 9,9495 * ton 


18 REM CONCENTRIC SQUARES 
20 REM USING WINDOW METHOD 


5 REM PROGRAM 1 30 MODES 
18 REM COMPARISON OF FILLED 49 GCOL3,129 
20 REM RECTANGLE SPEEDS 50 FOR X$-0 TO 500 STEP 8 
. 30 MODES 60 VDU24,64Ø-X%;512-X%; 64Ø+X%; 5124 
40 XS; 
5Ø REM WINDOW METHOD 7Ø CLG 


6Ø 8Ø NEXT 

7Ø TIME=Ø P 
80 VDU24,200; 300; 1000; 900; 

98 GCOL9,129:CLG 

190 PRINTTAB(9,25)"WINDOW TIME "; TIME 


120 REM FILLED TRIANGLE METHOD 


148 TIME=Ø | 

150 PLOT4,2ØØ, 3ØØ: PLOT4,1000 , 300 
160 PLOT85,200,900: PLOT85,1000,900 
170 PRINTTAB(Ø,26) "FILLED TRIANGLE "; 


DID 
'e*e*o*o*0*67670 07070 € 070 0^0 070-070707070707079707070707876747070757070"07079*0 470707970 6707579" 07070 2" «7«7«" «70 c7a70 "07070 o"a76 
ataata a 9,9,0,0,0,0,9,0,9,959,94,9,9,9,9 4949, 949,9 9,0, 9,9494 49 59, 9, a a one ene ste ete a Mr OQ OCC OCA CUR ORO ARM 
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by Alan Webster 


We have received a letter from J. Austin Porter asking how to generate accented 


letters for foreign languages. Given below are four different ways of achieving 
this. 


1) The first is to define your own complete accented character on an 8 by 8 grid 
using the VDU23 call (see 'User Defined Graphics’, BEEBUG vol.l no.2 p.9, and 
BEEBUGSOFT's Utilities 1 cassette which contains a character define program). For 
an example of this method type in this short program: | 

10 MODE 4 

20 VDU 23,225,56,68,0,56,100,124,96,56 

30 PRINT TAB(2Ø,2Ø) ;CHR$225 
This creates a complete 'e' circumflex in lower case. It is printed out in line 39. 


2) The second way of creating accented letters is to add an accent to existing text 
with a separate accent character. The way we do this is to use VDU5 to write text at 
the graphics cursor. The reason for this is so that we don't delete the character 
already there when we try to add the accent. Listed below is a program that shows 
the use of VDU5: 


18 MODE 4 Selects the appropriate mode 

20 VDU5 Enables us to write at the graphics cursor 

30 MOVE 190,100 Moves us to a position on the screen 

40 PRINT"Espana" Prints our text 

50 MOVE 224,119 Moves the graphics cursor to above the 'n' in Espana 
60 PRINT"^" Prints the accent 

70 VDU4 Returns us to text mode 


3) The third way is to combine methods | and 2 above by first creating just the 
accent, and then printing it over existing text. This is necessary, since although 
the BBC keyboard has a tilde, it does not have grave, circumflex and other accents. 

10 MODE 4 

20 VDU5 | 

30 VDU 23,225,0,30,33,0,0,0,0,0 

49 MOVE 100,100 

5@ PRINT "Espana" 

60 MOVE 224,110 

70 PRINT CHR$225 

80 VDUA 
This example creates an accent and stores it as character 225. The rest of the 
program is explained above in the second example. 


4) The fourth way, which only works on operating system 1.2, is to use the TAB key 
to provide a complete accented character that you have defined. As an example RUN 
the first program and type: 
|. *FX219,225 «return» 
and then press the TAB key. This should give you the accent character. To return the 
TAB key to normal mode type: | 
*FX 219,9 

In an analogous way, each of the function keys, when pressed in conjunction with the 
CTRL or SHIFT key can be made to produce an accented character on operating system 
1.2. This is achieved by using the calls *FX225-228. See User Guide pp 439-440. If 
you wish to print out accented characters, then the easiest way is probably to use a 
printer such as the Epson FT III which has software selectable foreign character 


sets, or to use a daisywheel printer - many of which have accented characters on 
their range of daisywheels. it | 
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Disc Formatting Program 


DISC ROUNDUP 


DFS Command Summary 


by Colin Opie Program by Richard Russell 


New Error Codes 


It was mentioned in last months BEEBUG (p.20) that we hoped to supply in the 
forthcoming issue a disc formatting program together with details of the Disc Filing 
System (DFS) commands. Well, here it is! Now you need not pay £30 for the 
'privilege' of actually using the disc interface that you have already bought. Of 
course, if you buy Acorn's own drives then you get a manual and a formatting 
program. But the Acorn drives are more than a shade more expensive than those of 
their competitors. We are most grateful to Richard Russell of the BBC who supplied 
the formatting program. A formatter is an essential piece of software which must be 
used to format each new disc before it can be used to store programs or data. In 
essence this formatting operation places signals on the disc which the DFS needs in 
order to be able to correctly traverse a rotating disc and find the particular 
track(s) and sector(s) where a program or data is going to be stored and 
subsequently retrieved. Richard has written an efficient formatter which can be used 
to format 40 or 80 track discs using single or double sided drives. Even though it 
is written in Basic it is fast, formatting a 40 track disc in less than 360 seconds. 
DISC FORMATTER 

Richard has chosen to make the program readable at the expense of compactness. 
His intention was to make its structure understandable and easy to amend as so 
desired. In its present form it does not prompt for the number of tracks or the 
drive number. It would be very easy to incorporate such prompts, collecting 
appropriate values for variables 'drive' and 'tracks' (lines 70 and 89), since 
Richard has used long variable names. For example the last statement on line 869 
reads ‘tracks=4@'. To format $80 track discs, just change this to 'tracks-80'. To 
format the flip side of a double-sided disc you will need to alter the 
statement: drive=Ø in line 70 to: drive-2 (the numbering system and terminology 
used for accessing discs is described under DFS Command Structure below). You may 
wish to make this input driven by adding: 75 INPUT"Drive",drive:?par-drive . When 
using this modification, you could respond with Ø first time around, and then with 
26 


One of the reasons for the fast operation of this formatter is that the whole 
disc is formatted before it is verified. Also no 'retries' are allowed if formatting 
or verification fails at any point. These are not unreasonable actions to take. 
Re-tries are rarely necessary and perhaps not even desirable as formatting is always 
taking place under the most favourable conditions, ie. with newly written data being 
immediately read on the same disc in the same drive. 


The formatter uses entirely 'legal' code and should therefore work across the 
Tube, All direct memory accesses are to buffers allocated with the DIM statement. 
Now that you have a disc formatter program, all that is required to enable you to 
use your disc(s) is a description of the DFS commands. 


THE STORY SO FAR l 
In previous issues of BEEBUG there have been articles on the disc system as 
follows: 
a) DEC'82 pp.6-9, 'Disc System Review' 
b) FEB'83 pp.19-20, 'Disc Roundup'. 
These articles show the use of '*HELP DFS' to obtain help messages from the 


computer, and give useful ideas on how to use the disc system efficiently. Disc 
hints and other related articles will continue to be a feature of the magazine. We 
now give a much fuller description of the DFS commands. 


DES COMMAND STRUCTURE | 
There are certain filename conventions used within the DFS commands which we have 
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o know about. With a cassette system there is only one cassette player, the side of 
the tape we wish to use is determined by which way we manually put the tape into the 
player, and so on. Disc systems give us more options. For example there could be 
more than one drive available, a drive might be double-sided (ie. it has two 'heads' 
and can therefore read both sides of a disc). 


The full specification of a disc filename can be denoted by: 
:n.d.name 
where 'n' is the drive number ranging from Ø to 3 (and preceded by a colon), 'd' is 
the directory code (see below), and 'name' is the actual name of the file. 


A single single-sided drive has the drive number 0. A second drive would have the 
drive number 1. If the drives were double-sided then the 'flip' side of the discs 
would be known as drive 2 and drive 3 respectively. Note therefore that the flip 
side of drive Ø is drive 2, and the flip side of drive 1 is drive 3. 


A file may also be designated as being in a 'directory' area, the directory name 
being a single character. '$' (dollar) is the default directory (see later under 
*DRIVE and *DIR). When the filing system is started from cold drive Ø and directory 
'$' are assumed to be the current ones. 


File names can be up to 7 alphanumeric characters in length - which is extremely 
Short - and you cannot use the special characters hash (4), asterisk (*), full stop 
(.) or colon (:). The reason why the full stop and colon cannot be used is because, 
as is seen from the filename specification above, they are used as delimiters. A 
hash sign can be used in certain commands to take the place of any character for 
matching purposes, and an asterisk can be used for the same purpose in place of any 
Sequence of characters, (up to a delimiter). These last two special symbols are 
known as 'wildcards'. 


Note that the drive number and/or the directory letter, together with their 
delimiters, can be left off a filename specification provided you are willing to let 
the system use the assumed values. For example if the current drive is drive 2 and 


the current directory is 'G' then the following commands will be identical in 
effect: l 


SAVE" : 2. G. NAME" SAVE" : 2, NAME" 
SAVE"G. NAME" SAVE" NAME" 
This feature may take a little getting used to at first, but it soon becomes 


fairly natural. The options available can be put to very good use once they have 
been mastered. 


The official User Gace on the DFS runs to 86 pages and therefore it is clearly 
not possible to give as much detail here. On the other hand we give below a nucleus 
of information which, once known, will allow you to use a very large percentage of 
the facilities of fered by the DFS. 


Given below is a list of the commands available, their minimum abbreviation (the 
full stop must be included), and their purpose. Arguments (parameters which must be 
entered after the main command) must be separated by a space, except where otherwise 
stated. The term 'fspec' refers to a legal file specification (as discussed above). 
WARNING: all commands with the symbol '[4]' against the text below can result in the 
destruction of programs or data currently held in memory. 


*ACCESS *A, Locks or unlocks a file. If a file is locked then it cannot 
be written over. It is locked by using the form: 
*ACCESS fspec L and unlocked by omitting the "'L' in the 

| command . 
*BACKUP *BAC. Will enable the entire contents of one disc to be backed up 
(ie. copied) on another disc. Two arguments are required, 
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*BUILD *BU. 
*CAT Ey 


*COMPACT *COM. 


*COPY *COP. 


*DELETE *DE. 


*DESTROY  *DES. 


*DIR *DI. 


*DRIVE *DR. 


*DUMP *DU. 


*ENABLE  *EN. 


*EXEC *E. 
*HELP *H. 
*INFO *I, 
*LIB *LIB 
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the source and desti 
[+] | 
The argument to BUILD is 'fspec'. All subsequent ‘auto’ 
entered text will be placed into the specified file. 
Optional | drive number as an argument. It supplies a 
catalogue of the specified (or current) drive. 

Optional a drive number as an argument. This takes all the 
data and programs on the specified disc and closes them up 
together. In this way there is no wasted space on the disc. 
The files can still be accessed individually afterwards. 
This is the command to use if you find that your disc is 
"full" - it probably isn't, it just requires the stored 
information to be compacted (but see warning about  *COMPACT 
in BEEBUG no.9, p.20). [+] 

Three arguments are required for this command. The first is 
the source drive number, the second is the destination drive 
number, and the third is 'fspec'. This is one command where 
the wildcard characters (hash and dollar) become very useful 
in the copying of multiple files. Eg: *COPY Ø | DATA2 will 
copy the file 'DATA2' from drive Ø to drive 1. [+] 

This will remove the specified single file from the disc 
area. The argument is therefore 'fspec' and wildcards may 
not be used. 

This has the same form of argument as *DELETE (ie, "'fspec') 
with the exception that wildcards may be used, so as to 
delete a possible multiple number of files. See also 
*ENABLE. 

Requires a directory character as its argument, and will set 
the 'current' directory to this value. 

The argument is a valid drive number. The current ‘assumed’ 
drive will be set accordingly. 

The argument is 'fspec' and it will produce a hexadecimal 
listing (dump) of the specified file on to the screen. It is 
useful to set ‘page’ mode before calling this command. See 
also the commands *LIST and *TYPE. 

Two commands, *BACKUP and *DESTROY, cannot be used unless 
they are previously 'enabled'. This command performs the 
enabling. No arguments are required. 

A text file may be held on disc and then read as though the 
text were coming from the keyboard. A convenient way of 
getting the text on to disc is through use of the *BUILD 
command. This facility is a convenient one to use for 
merging programs that have been spooled (see BEEBUG no.9, 
p.28). The argument to *EXEC is 'fspec'. 

This requires an argument consisting of either or both of 
the keywords DFS and UTILS. It displays useful information 
about the commands available in the disc system and is 
therefore a good 'quick reference' guide. 

The argument is 'fspec' and the command displays information 
about the specified file(s). More information is given than 
by using *CAT and it comes in the following order: 
Directory, Filename, Access code, Load address, Execution 
address, Length (bytes), and Start sector. 

À machine code program on disc may be loaded and run in one 
complete operation merely by typing *name (where 'name' is 
the name of the program), provided it exists on the drive 
and in the directory given by the ‘library’ area 
specification of the current drive. For example, if a *CAT 
on the current drive (say, drive ø) shows the library area 
specification to be :Ø.X then a program with the file 
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*LIST 


*LOAD 


*OPT ] 


*OPT 4 


*RENAME 


*RUN 


*SAVE 


*SPOOL 


*TITLE 


* TYPE 


*WIPE 


*LIST 


*L. 


*0.1 


*0,4 


*RE. 


*R, 


*S. 


*SP. 


*TI, 


*TY, 


*W, 
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pe cation :Ø.X.MERGE can be loaded and run by merely 
typing *MERGE. The command *LIB accepts the form - 
sned — , where 'n' and 'd' are the drive number and 
directory which is to be used as the future library area. 
This command is.related to *TYPE and *DUMP in that they are 
all 'listing' commands. *LIST will display on the screen the 
specified text file, with line numbers. The argument is 
therefore 'fspec'. 
This command is the disc equivalent of the same command 
within the Cassette system and has the same form, except 
that the cassette filename must be replaced by a valid 
! fspec'., 
It is possible to get the system to display the information 
normally given by *INFO whenever a file is accessed. 
*OPT 1 1 will enable this feature, and *OPT 1 Ø will disable 
it. 
This command will select the auto-start option for the 
current drive. Four options are available: 
*OPT 4 Ø does nothing (off) 
*OPT 4 ] will *LOAD !BOOT 
*OPT 4 2 will *RUN !BOOT 
*OPT 4 3 will *EXEC !BOOT 
Note that the file !BOOT is therefore a special file as far 
as the system is concerned (see Auto Start article in BEEBUG 
no.,9, p.19). 
Enables the name of a file to be changed and/or its 
directory (but not its drive). Two arguments are required, 
each one being a 'fspec'. The first is the original name and 
the second is the new name required. Note that the drive 
number would normally be omitted from the file 
specifications, but if included they must refer to the same 


drive. 
This command is the disc equivalent of the same command 


within the Cassette system and has the same form, except 
that the cassette filename must be replaced by a valid 
' fspec', 

This command is the disc equivalent of the same command 
within the Cassette system and has the same form, except 
that the cassette filename must be replaced by a valid 
'"fspec'. 

This has two forms, one with an argument ('fspec') and the 
other without. *SPOOL with an argument will open up the 
specified file to accept all characters sent to the screen 
(ie. it is like a printer echo except that o/p is going to a 
disc text file). The file is closed by executing *SPOOL 
without an argument. One use for this command is to obtain a 
text copy on disc of a Basic program. Another use is in the 
merging of Basic programs (see BEEBUG no.9, p.29). 

Each disc may have a title of up to 12 characters. This 
command accepts a string as an argument and uses the first 
12 characters for entitling the disc. Quotes are only 
necessary around the string if it contains spaces. You can 
obtain coloured titles - see disc hint in this issue. 

This command is the same as *LIST except that the text file 
is listed without line numbers. For a useful application of 
this command see BEEBUG no.9, p.19. 

This is similar to *DESTROY except that you get the 
opportunity to confirm the deletion of any file which 
matches the specification. Type a 'Y' if you still want the 
file erased or 'N' if not. Note that the abbreviated form 
ill not work if you have Wordwise in your machine. 
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Note that the above '*' commands are pure Filing System comman 
to the standard Basic commands LOAD, SAVE, CHAIN, BGET etc., which will work with 
both Cassette and Disc systems. Once the DFS is fitted you can type the command 
*TAPE to get the machine to think that it is a Cassette system and then *DISC to 
return to a disc system. This provides a very easy mechanism for transferring files 
from cassette to disc and vice versa. 


DISC FAULT ERROR MESSAGES 
There are a number of error messages generated by the DFS, of which most are self 
explanatory. Two of these are 'umbrella' type error messages which merely give a 
vague reason for the error followed by the relevant disc interface error code. They 
have the form: 
Disc fault NN at TT/SS 
Drive fault NN at TT/SS 
where NN is the error code and TT/SS is the track and sector where the error was 
found. The following table, supplied by Richard Russell, gives a list of the NN 
error codes (in hexadecimal) together with their meaning and probable cause: 
CODE MEANING PROBABLE CAUSE 
98 Clock error Damaged disk / Faulty disk drive 
ØA Late DMA Faulty computer 


gC ID CRC error 

ØE Data CRC error 
1Ø Drive not ready 
12 Write protect 


Damaged disk / Faulty disk drive 
Damaged disk / Faulty disk drive 
Faulty disk drive 

Disk write protected 


14 Track Ø not found Faulty disk drive 


16 Write fault 
18 Sector not found 


Faulty computer 
Disk not formatted or incorrectly 
formatted 


The codes have been deduced from the data book on the disc interface controller IC, 
and it is not clear whether all of them can be produced by the DFS. This is 
particularly true of code 12 (Hex) which seems to be intercepted by the DFS in order 
to produce the more ‘friendly’ message of "Disc read only’. 


FINALLY 


As mentioned above, BEEBUG will be carrying a regular feature on disc use (and 
abuse!). The above information should be enough to get you started, and then perhaps 
you can start to share your own hints and tips. 


lOREM. Program to format a disk 

20REM. (alternative to FORMA) 

3ØREM. by R.T.Russell, BBC, 17-02 
-1983. 

40: 

5QDIM par 15,buffer 255:X%=par MO 
D 256:Y$-par DIV 256:A%=&7F 

60: 

70MODE 7:WIDTH Ø:drive=Ø:0sword=& 
FFF] :?par=drive 

8Øhead=Ø:gap3=27:gap1=22:length=1 
:Sectors-]0:tracks-40 

90: 

JØØPRINT ''"This program formats t 
he disk in drive ";drive 

TTØPRINT "Do you really want to fo 
rmat the disk? " 

1200N INSTR("YyNn",GET$) GOTO 130, 
130,890,898 ELSE 129 

130: 

140PRINT '"Formatting drive "driv 
e? 

15ØFOR t 


k= k 


16Ø0%=4: PRINT track;:02-&90A 
17ØPROCseek (track) 

18ØPROCformat (track) 

190NEXT track 

200: 

21 ØPRINT '"yerifying drive ";drive 


220FOR track- TO tracks-] 
230@%=4:PRINT track; :03=&9ØA 
248PROCverify (track) 

25ØNEXT track 

260: 

27ØPRINT '"Initialising drive ";dr 


ive 


280PROCinitialise 
290PRINT '"Finished." 
3ØØEND 

318: 

320DEF PROCseek (track) 
33@par!1=buffer . 
34Øpar?5=]1 
350par?6=&69 


| 36Øpar?7=track 
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37ØCALL osword 640par?6-&5F 

389? par=-] 65øpar?7=track 

39ØENDPROC 660par?8-0 

400: | 67øpar?9=sectors+32*length 

AlØDEF PROCformat (track) 680CALL osword 

420FOR sector- TO sectors-] 6901F par?1Ø PRINT'"Verify error"" 

43Øident=buffer+4*sector : END 

44gident?(-track 7ØØENDPROC 

45øident?1=head 710: 

460ident?2-sector 720DEF PROCinitialise 

47øident?3=length 730FOR i=Ø TO 252 STEP 4 

480NEXT sector | 7åØbuffer ! i=Ø 

490par! 1=buf fer 750NEXT i 

500par?5-5 76@par I |=buf fer 

510par?6-&63 77Øpar?5=3 

520par?7-track 780par?6-&4B 

530par?8-gap3-6 790par?7-0 

54Øpar?9=sectors+32*length 800par?8-0 

55øpar?1Ø=Ø | 81Øpar?9=1+32* length 

560par?11-gapl-6 820CALL osword 

57ØCALL osword 83Øbuffer?7=sectors*tracks 

580IF par?12 PRINT'"Formatting err 84Øbuf fer?6=(sectors*tracks) DIV 256 
or" "END 85Øpar?8=1 

59ØENDPROC 86ØIF par?10-0 CALL osword 

690: 870IF par?10 PRINT'"Initialise err 

61@DEF PROCverify(track) or”? : END 

62Øpar ! |=buf fer i 880ENDPROC 


63Øpar?5=3 


OT TRUE? 
The User Guide on page 100 declares that all non-zero values are regarded as 
TRUE. John Dove has written to point out that this is not exactly correct for 
non-integers. A conversion to integer form takes place before the test, and thus any 
number between -] and +1 (but not including) is recognised as FALSE, eg: 
10 H=Ø.5 
20 IF H THEN PRINT"YES" ELSE PRINT"NO" 
RUN 


DEBUGGING WITH EVAL 
The following routine from G.Weston of Clwyd is useful if your program needs 

debugging. When called by the main program it asks for the variable name that you 
wish to test and prints out the contents of it. 

2000 DEF PROCTEST 

2010 INPUT"Var."Z$ 

2020 IF Z$<>"999" PRINT EVAL(Z$) :GOTO 2919 

2030 ENDPROC 
To use this procedure just insert the line PROCTEST at the trouble spot and you can 
then test the variables. | 
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NON-ACCESSIBLE FILENAMES 


When using Wordwise if you select option 1] to save the file on disc, and then 
accidently enter *. to obtain a catalogue, you will end up with a file on disc 
apparently called #.* try as you may you cannot delete this in the ordinary way, so 
you are stuck with it. The following run will delete it from the disc. 

| DIM X% 30: Y$-X$ DIV 256: $X%="DELETE *.":CALL &FFF7 


The same problem could arise with other packages currently on the market, so be 
careful | TT | 
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by John Yale 


John Yale explains a way of using variable filenames from within a program. This. 
is an essential requirement of any data handling program but cannot be directly 


performed on the BBC micro. 


When using the *SAVE and *LOAD commands from within a Basic program it is not 
possible to use a Basic string as a filename, or a Basic variable as an address. 
The reason for this is that the entire line after the '*' is passed to the MOS which 
knows nothing about Basic variables. 


However the MOS contains a routine OSCLI, described on page 463 of the manual, 
which allows any MOS command string to be passed to it by address. Therefore if we 
build the command string in memory before passing it to OSCLI then any Basic strings 
or variables may be used as file names. 


The demonstation program below shows this being done for *LOAD and *SAVE (Note 
that the * is not needed in the command line) with filename F$. The program saves 
and loads the function key buffer at &ØBØØ. 


To use this technique, include lines 40,50 and the procedure PROCoscli in your 
program, and call as shown in lines 140 and 199. To understand the multiple 
quotes, remember that double quotes ("") within a quoted string effectively places 
one set of quotes (") in that string. So """" is a string containing just " . 


To use Basic variables as the address in the command line, use may be made of 
STRS . It is not generally known that ~ may be used with STRS to force conversion 
in hexadecimal as required by the *SAVE and *LOAD commands. eg: 

A$-109 

AS=STRS (A%) 
BS-STRS^ (A$) 
PRINT A$,B$ 


A call to save a file F$ from address S$ to E$ would be: 
PROCoscli ("SAVE"""+E$+""""4STRS" (S$)+" "+STRS" (ES) ) 


To see how this command line is made up try typing: 


FS = "TEST" 
S$ = &1234 
E% = &5678 


PRINT" SAVE" ""+4FS+""""4S7TRS~ (Sg) +" "+STRS~ (E$) 


when you will see printed: SAVE"TEST" 1234 5678 


which is the correct command. It is advisable to check programs of this type in 
this way before running them, copying the relevant code into the PRINT statement 
directly from the program with the COPY key. 


The technique described above can be used to insert a string variable in any 
* command; and another use of the procedure PROCoscli is to set a function key with 
a string containing the contents of a Basic string variable. eg: 


PROCOSC1 i ("KEY"+STRS (NS) +K$) 


programs key N with string KS. 
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Note that if your machine is fitted with Basic version 2, there is a more direct 
way of addressing the command line interpreter. The same principles apply, but see 
BEEBUG no.6 p.11. 


10 REM Passing filenames to the MOS 158 ENDPROC 

20 160 DEFPROCload 

30 REM Allocate buffer for command line 170 INPUT"Filename to load ",F$ 
40 oscli$- &FFF7 188 

50 DIM buf$ 30 198 PROCoscl1i ("LOAD"""+FS+"""") 
60 200 ENDPROC 

70 INPUT"LOAD or SAVE" ,A$ 21Ø 

80 IF AS-"LOAD" THEN PROCload 220 END 

99 IF AS="SAVE" THEN PROCsave 230 DEFPROCoscli (cline$) 
100 GOTO 79 240 Sbuf$ - cline$ 
118 DEFPROCsave 250 X%=buf% 
120 INPUT"Filename to save ",FS 260 Y%=buf% DIV 256 
139 270 CALL oscli$ 


140 PROCoscli ("SAVE"""+F$+""" ØBØØ ØBFF") 280 ENDPROC 


CONTROL CHARACTERS 


If you press the CTRL key at the same time as certain keyboard letters, you can 
generate some useful control codes, enabling you for example to clear the screen or 
home the cursor to the top left hand corner, all at a stroke. Here are some of the 
more useful but less well known ones: 

CTRL G Beep (same as VDU7) 

CTRL H Cursor left (non-erasing) 


CTRL I Cursor right 
CTRL J Cursor down 
CTRL K Cursor up (once it reaches the top it will scroll the screen down) 
CTRL L Clear text screen (perhaps the most useful) 
CIRL M Return 
CTRL P Clear graphics screen 
V 


Followed by a number Ø to 7 will execute a mode change - but use it 
advisedly since it does not reset HIMEM - giving the wrong memory 
allocation for the chosen mode. 

Note that all of these control characters may be embedded in the user keys by use of 
the | character. For example |M is 'return' |G is 'beep'. See also the User Guide 
pp. 488-490. 
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MUSICAL DATA STATEMENTS 


When creating music on the Beeb it is very wasteful to keep on typing in SOUND 
statements. A much better method is to use DATA statements to hold the information 
about the notes. An example of this was supplied by Tony Fryer (aged 12), which 
gives a never ending rendering of the popular song 'Lazy-bones': 


10 REPEAT: REPEAT 120 DATA 145,7,149,3,153,7,157,3 


20 READ P,D | 130 DATA 149,10,141,10,129,10,177,10 

30 SOUND 1,-15,P,D 140 DATA 157,20,145,7,149,3,145,7 

40 UNTIL P<Ø 158 DATA 149,3,145,10,149,19,137,40 
. 58 RESTORE 160 DATA 137,0,137,7,145,3,137;,7 

60 UNTIL FALSE 170 DATA 145,3,137,18,129,18,129,8 


100 DATA 157,12,145,5,129,20,145,7 180 DATA 129,20,-1,0 
118 DATA 149,3,153,7,157,3,129,20 
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This is a simple 2-D game which sets the scene for a duel between two artillery 
barrages, each barrage being shown as a single turret station. It is really a game 
for two players. Each player becomes the gunnery commander for the appropriate 
barrage. Each commander has alternate opportunities at trying to estimate: 

a) the necessary angle of his gun turret, and 

b) the number of powder bags required to hit his opponents gun. 
Each entry is terminated by pressing «return». For each duel there is an invariable 
wind direction and speed, displayed at the top of the screen, which must be taken 
account of in your estimations as gunnery commander. Previous estimations are left 
on the screen so that a clear record is kept of past attempts. 


A nice feature of the game is the way in which it randomly creates different 
landscapes for each duel. Some of the resulting landscapes require considerable 
Skill in gunnery, especially in view of the variety of possible wind directions and 
strengths. 


If you have a 32K machine you can obtain a greater range of colours by ae 
Mode ] in line 6Ø. 


LIST OF MAJOR PROCEDURES 


PROCEDURE USE 


Ld Draws the random landscape by using function 'Sfc' 

Cs Sets the screen colours and gives the headings 

Gps Draws the gun positions 

Fr . This accepts the values for a shot and then fires the 
missile, checking for a hit 

HIT Called by procedure 'Fr', and displays an exploding gun. 


20 MODE7:VDU23; 11,0; 0; 0;0 
30 PRINTTAB(1Ø, 19) CHRS141" ARTILLERY DUEL" ' TAB (1 Ø) CHRS 
141"ARTILLERY DUEL"TAB(10)CHR$141" 

40 TIME=Ø:REPEAT:UNTILTIME=2ØØ 

5Q CLS 

50 MODE4:VDU23:11,Ø:Ø:Ø 

70 VDUI9,0,4,0,0,0,19,3 

80 RY$-1:HIT$-0 | 

90 WES-RND(400) : EES-RND(400) :WH$-4*RND(160) -4: EH$-1289. | 
-A*RND (160) :WS%=RND (50) | 
100 HE$-(RND(640- (EES4WES) ) ) /2 

110 WGS-RND (640) -1| :WGY8=FNSEc (NGS) 
120 EG$-1241-RND(601) : EGYSSFNSÉC (EGS) 
130 IFRND(1)»9.5THENWS$--WS$ 

148 IFRND(1)»50., STHENR$-1ELSER$-- 1 


° 
[4 
L4 


0 
2,0,0,0 


158 GCOLØ,3 

169 PROCLd 

178 PROCCS 

180 PROCGps | 

198 REPEATIFR%=1|PROCFr (EG%, EGYS, WGS , WGY3) ELSEPROCFr (WG $ mms 

WGYS , EGS, EGYS) 320 W%=EH%-WH% 

200 UNTILHIT$-] 330 I$-WES-HES 

216 GOTO60 340 J$=-HE$*COS (RAD ((XX%-WH%) *360/W&) ) 
220 END 350 K$&-(XX$-WH$) * (EES-WES) /W$ 

230 DEFPROCLd 360 =1%+J%+K% 

240 FORXX%=(TO1 280STEP4 378 DEFPROCGps 

250 MOVEXX%,Ø | 380 GCOLØ, 1 

260 DRAWXX$,FNSfc(XX$) 3980 VDUS:MOVENG%, FNS£c (WG$) +38: PRINTCHRS224: MOVEEGS- 20, 
270 NEXT FNS£c (EG$- 290) +3Ø: PRINTCHRS225: VDU4 

280 ENDPROC 400 ENDPROC 

290 DEFFNSfÍcC(XX&) 419 DEFPROCCS 

300 IFXX$XWHSTHENZWES | 420 VDU23,224,1,2,4,8,24,56,120,255 


310 IFXX%>=EHSANDXX3<=1|279THEN=EE% . 430 VDU23,225,128,64,32,16,24,28,30,255 
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440 VDU23,226,24,12,6,255,255,6,12,24 680 MOVEXAtt4,YA$-4:MOVEXAS-4 , YA%-4: PLOT87 , XA$-4 , YAS+4 

450 VDU23,227,24,48,96,255,255,96,48,24 : PLOT87,XA$-4, YAS+4 

460 COLOUR] 698 PROCGps 

470 PRINT" ANGLE BAGS WIND ";ABS(WS&);TAB(29)" A | 700 XA%=X%:YA%=Y% 
NGLE BAGS" 710 IFX$>TAR%-|ØANDXSCTARS+1 ØANDYS>TARYS-1| ØANDYSCTARYS 

48Ø IFWS%>=ØTHENPRINTTAB (21 , Ø) CHR$226ELSEPRINTTAB (21 , Ø) |+1 ØTHENGCOLØ, 3: PROCHIT: ENDPROC 
CHR$227 720 IFYS«FNSfc(X$&) THENGOTO74Ø 

498 COLOUR] 730 IFX%>GANDX%<1 28ØTHENGOTO62Ø 

500 PRINTTAB(Ø,Ø)CHR$224TAB (28, 0) CHR$225 740 SOUNDØ,-15,6,2 

510 ENDPROC 758 GCOLØ,Ø 

520 DEFPROCFr (GUN$ , GUNY$ , TARS , TARY$) | 760 MOVEX$,FNSfc (X%) -1Ø:MOVEX$-5, FNSÉC (X&—5) : PLOT85, X% 

538 COLOUR] *5,FNSÉC (X$45) 

548 VDU23;11,255;0;0;0 770 IFR$&-lTHENRYS&-RY$4 

550 VDU31,15+14*R%, RYS 780 R3=-R% 

560 INPUT" "ANGLE 798 ENDPROC 

579 VDU31,21+14*R%, RY% 8ØØ DEFPROCHIT 

58Ø INPUT" "BAGS 810 HIT$-1 

590 VDU23;11,0;0;0;0 820 ENVELOPE1,2,0,0,0,0,0,0,127,0,0,—1,0,126: SOUNDS, I, 

600 TIME=Ø:GCOLA, 1 4, 5: SOUNDØ, I , 5, 1 Ø: SOUNDA; 1,6, 15 

510 XAS=GUN%: YAS=GUNYS 830 FORC%=ØTO15Ø 

620 TIM=TIME/1Ø 84Ø DIST%=RND(1ØØ) : ANG=RAD(RND (369) ) 

630 ZR&-TIM*TIM/2000*WS$ 850 PLOT69,X%+DIST%*COS (ANG) , YS-DISTS*SIN(ANG) 

640 XR%=-R%*BAGS*TIM*COS (RAD (ANGLE) ) +ZR% i 860 NEXT 

550 YRS-BAGS*TIM*SIN (RAD (ANGLE) ) -Ø.5*TIM*TIM/1Ø 878 TIME=Ø:REPEATUNTILTIME=5ØØ 


660 X%=GUNS+XR%:Y%=GUNYS+YRS 
970 MOVEX$-4,Y$-4:MOVEX$-4 , Y$-4: PLOT85,X%+4, Y$-4: PLOTS 5, 
X8—4 , Y%+4 


"a" a" a" a" o" a we 
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MORE LIVES IN ROCKET RAID 


Heres a tip for those people who need lots of practice at cracking the final 
sector in Acornsoft's "Rocket Raid". Do the following: 


PAGE-&4000 
LOAD"RAID2" 
1859 ?&1178-&7F 
RUN 


This will give you 128 lives! - John Harris. 
[We cannot verify the above because we don't yet have a copy of Rocket Raid.  Ed.] 
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MAKE-SHIFT DOLLAR SIGNS 


To anyone who has either a typewriter or a printer without a dollar sign, you may 
like to try the sequence of a capital 'S', a backspace, then a slash sign '/'. 
Although it doesn't look exactly the same as a dollar sign, it gives a fair 
representation. 
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Text by Sheridan Williams, Program by Jack Hardie 


Life is a game that was developed by Professor John Conway at the University of 
Cambridge. As far as I am aware it was first published in the "Mathematical Games” 
feature in "Scientific American" magazine by Martin Gardner in October 1979. 


The game is played on a grid, where each cell may be alive or dead. Each cell 
has 8 neighbours. The population of the cells change by a set of predetermined 
rules which are as follows: 


l. If a live cell has 2 or 3 live neighbours it will live on to the next 
generation. | 

2. If an empty (dead) cell has exactly 3 neighbours the cell will be born in the 
next generation. 

3. If a cell has none or 1 neighbour it will die of loneliness. 

4. If a cell has 4 or more neighbours it will die from overcrowding. 


The study of 'LIFE' has become a cult and there are numerous references to it in 
all sorts of magazines. Here are some references for further reading: 
BYTE magazine Sept 75, Oct 75, Dec 75, Jan 76, Dec 78, Jan 79; 
SCIENTIFIC AMERICAN Oct 70, Nov 70, Jan 71, Feb 71, Mar 71, Apr 71, Nov 71, Jan 82. 
There must be other references too in British magazines. 


There is even a set of jargon built up around LIFE, for example various shapes 
can be divided into classes like Constellation, Still Life, Oscillator, Methuselah, 
Spaceship, Uniform Propagators, Eaters etc. 


Here are two examples, the first is of a Spaceship called a 'glider', the second 
is one of the record holders for a long lived "Methuselah" system: 


GLIDER METHUSELAH 
— —-———— The glider will move slowly across 
ER MEO the screen. The Methuselah will just 
man de ER expand, for ever? 


There are also 'puffer trains', 'glider guns' and many others. Try and invent 
some of your own. As a last example here is a basic shuttle. The four blobs at 
either end are 'eaters' and are used to clear up the debris. The central Shape will 
change, but it will move regularly between the left and right 'eaters' for ever. 
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We will give £29 for the first pattern that produces the most interesting (in the 
editors' view) pattern in less than 100 generations using this version of LIFE. 
Entries must be on a postcard together with your name and address - no replies can 
be given, but we will publish a selection of the best: send to LIFE competition, 
PO Box 58, St Albans, Herts. 


The particular implementation of LIFE listed below combines Basic and assembler 
in an intelligent way. The most time critical operations are in assembler, and the 
other parts are in Basic for ease of writing. The program also makes good use of 
procedures. Note how the three main assembler routines are used with the statements: 
CALL zero, CALL breed and CALL screen in lines 260,330 and 350 respectively. 


Be very careful when typing in lines 900-2520; and make sure that you save a copy 


before actually running the program because an error in the assembler part can 
disable the system. 


10 REM LIFE in BASIC and assembler. 460 VDUI9,1,7,0,0,0: REM White f'ground 
20 REM Jack Hardie 11 October 1982. 470 VDU 23,224,8,&5D,&3E,&1C,&49,&55,&22,0: REM £rog ch 
30 REM Life pattern is stored in a aracter 
40 REM buffer extending down from 480 ENDPROC 
5C REM location 'topleft' (which 490 . 
60 REM corresponds to top left 500 DEF PROCPATTERN:REM Enter pattern. 
70 REM character of screen) for 51@ LOCAL key 
80 REM 31*40 memory locations 520 REM Disable editing 
98 REM (corresponding to 3] rows 530 *FX4,1 

.100 REM on the screen). Last screen 548 CLS:PROCPROMPTS 

118 REM row is left blank for text. 550 REPEAT 

120 REM Live positions on screen are 560 key=GET 

130 REM shown by frog-like character. 570 IF key<&8C AND key>&87 THEN PROCMOVE (key) 
140 REM In memory, live is l, dead is 580 IF key=&7F THEN PROCUNFROG 

150 REM 9. Bit Ø is current generation 590 IF key-&20 THEN PROCFROG 

160 REM bit 1 is the next. 600 IF (hey AND &DF)-&48 THEN PROCHELP:CALL zero:PROCP 
170 ROMPTS 

188 MODE 4 619 UNTIL key=&ØD 

190 HIMEM=HIMEM-&5ØØ 620 REM Enable editing. 

209 DIM note (8) l 630 *FX4,0 

210 PROCASSEMBLE ; 640 ENDPROC 

228 PROCVDU 656 ' 

230 PROCLOGO 6680 DEF PROCMOVE (k) 

240 REPEAT 670  VDU(k AND &F) 

245 PROCVDU 680 ENDPROC 

250 genz-] 690 

260 CALL zero 700 DEF PROCFROG 

270 PROCPATTERN 710 ?(topleft~POS—49*VPOS) =] 

280 VDU 23;8202;0;0;0;:REM cursor off 720 VDU 224,8 

290 CLS 730. ENDPROC 

300 PRINT TAB(19,31);"'Q'-quit, 'R'-repeat";TAB(]1,31) 749 

"Generation "; 750 DEF PROCUNFROG 

310 REPEAT 760 VDU 9,&7F 

320 gen=gen+1 77Ø OP EE me 

330 CALL breed 786 ENDPROC 

340 PRINT TAB(12,31) ;gen; 7968 

350 CALL screen 809 DEF PROCASSEMBLE 

360 key=INKEY(Ø) AND &DF 810 oswrchz&FFEE 

370 UNTIL key=&51 OR key=&52 820 pointer-&80 

380 VDU22,4:REM Enable cursor 830 count-&82 

390 UNTIL key-&5] 849 topleft=HIMEM+&5ØØ-4Ø 

400 MODE 7 850 toplo=topleft AND &FF 

410 PRINT TAB(15,1Ø) ;"Thats all." - 868 tophi=(topleft AND &FFØØ)/&FF 

4280 END © 870 DIM Q% 259 

430 889 FOR pass=Ø TO 2 STEP 2 

440 DEF PROCVDU 898 P$-0$ 


45g VDU? 


900 


ada 
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screen 

926 N Print LIFE pattern on screen 
930 N and shift each memory loc'n 
948 N right so that next generation 
950 N becomes bit zero. 

966 

978 \ Memory is read downwards from 
989 N 'topleft' down to first page 
996 \ boundary, then in 4 blocks of 
10909 N one page each. 
1816 

1928 LDA 130 

1938 JSR oswrch 

1040 LDA #0 

1958 STA pointer 

1968 LDA #tophi 

18780 STA pointer+] 
1080 LDX #5 

1890 LDY toplo 

1188. .nextchar 

1118 LDA (pointer),Y 
1128 LSR A N Next gen- 
1130 STA (pointer),Y N -eration 
1148 JSR writechar 

1150 DEY 

1160 BNE nextchar 

1178 LDA (pointer),Y N Y=@ is a 
1180 LSR A N special case 
1198 STA(pointer),Y 
1280 JSR writechar 
1218 DEY 

1228 .nextblock 
1230 DEC pointer-*] 
1240 DEX 

1250 BNE nextchar 
1260 LDA 1430 

1278 JSR oswrch 
1288 RTS 

1298 

1300 .writechar 
1318 BCS frog 

1328 LDA $&2Ø 

1338 JSR oswrch 
1340 RTS 

1350 .frog 

1360 LDA $224 
1378 JSR oswrch 


1380 RTS 
1398 


1400 .breed 
1418 N Apply LIFE rules, starting 
1420 N at screen row 3, column 2. 
1439 N Each of 8 neighbours is 
1440 N located by an offset from 
1450 N south-east neighbour. 
1468 
1478 CLD 
1480 LDA #toplo-82 
1498 STA pointer 

. 1509 LDA #tophi 
1518 STA pointer+1 
1528 LDX #5 
1539 .nextcell 
1548 JSR counter 
1558 JSR check 
1560 DEC pointer 
15780 BNE nextcell 
1588 JSR counter 
1598 JSR check 
1600 DEC pointer 
1618 DEC pointer+1 
1620 DEX 
1630 BNE nextcell 
1648 RTS 


N Cursor home 


X Block number 


N Block ptr. 
N Block count. 


N Cursor home. 


N ASCII space. 


N ASCII frog. 


N Start loc'n. 


N 5 blocks. 
N Count n'bours 
N Alive ? 


:N Zero case. 


N Next block. 


166Ø .counter 
1678 CLC 
1680 LDY 182 


N Offset for 
N N-West cell 
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1700 
1718 
1720 
1738 
1740 
1750 
1760 
1778 
1780 
1790 
1800 
1810 
1828 
1838 
1840 
1850 
1860 
1870 
1888 
1890 
1908 
1919 
. 1920 
1930 
1940 
1956 
1960 
1970 
1980 
1998 
2000 
2910 
2020 
2030 
2040 
2050 
2068 
2070 
2080 
2090 

. 2190 
2118 
2120 
2130 
2149 
2156 
2160 
2176 
2186 
2196 
2200 
2218 
2220 
2238 
2240 
2250 
2260 
2270 
2286 
2290 
2300 
2310 
2326 
2330 
2348 
2350 
2360 
2370 
23860 
2398 
2400 
2410 
2420 
2430. 
2440 
2450. 
2460. 

|. 2470 
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LDA $1 
AND (pointer),Y 
STA count 


DEY 

LDA #1 

AND (pointer) ,Y 
ADC count 

STA count 

DEY 

LDA #1 

AND (pointer) ,Y 
ADC count 

STA count 

LDY #42 

LDA #1 

AND (pointer) ,Y 
ADC count 

STA count - 
DEY: DEY 

LDA i! 

AND (pointer) ,Y 
ADC count 

STA count 

LDY #2 

LDA £1 

AND (pointer) ,Y 
ADC count 

STA count 

DEY 

LDA 41 

AND (pointer) ,Y 
ADC count 

STA count 

DEY 

LDA #1 

AND (pointer) ,Y 
ADC count 

STA count 

RTS 


echeck 
LDY #41 


LDA #3 

CMP count 

BEQ live 

LDA #2 

CMP count 

BEQ same 

dead 

LDA #1 

AND (pointer) ,Y 
STA (pointer) ,Y 
RTS 

esame LDA i! 
AND (pointer) ,Y 
BEQ dead 

elive 

LDA #2 

ORA (pointer) ,Y 
STA (pointer) ,Y 
RTS 


Zero 
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\ North cell. 


N N-East cell. 


N West cell 


N East cell. 


\ S-West cell. 


N South cell. 


X S-East cell. 


N Alive or dead? 
N Offset for 
N centre cell. 


N 3 neighbours. 
\ 2 neighbours. . 


N NOT 2 OR 3. 


N Set bit Ø. 


N Test bit Ø. 


N Reset bit 1. 


N Routine to set memory buffer 


N to zero. 

LDA #tophi 

STA pointer+] 
LDA #0 

STA pointer 

LDY #8 

LDX 45 
enextzero 

STA (pointer) ,Y 
DEY 

BNE nextzero 
STA (pointer) ,Y 
DEY 
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2486 


DEC pointer+] 


2498 DEX 


2508 
2519 
2520 
2530 
254 
2550 
2560 
2570 
2588 
2598 
2600 
2616 
2629 
2630 
2640 
2650 
2660 
2670 


BNE nextzero 
RTS 

] 

NEXT pass 
ENDPROC 


DEF PROCHELP 


LOCAL key 
REM Disable auto key repeat. 
*FX11,0 


LIFE" 
a 


PRINT" The world of LIFE is populated with " 
PRINT"small frog-like creatures which only" 
PRINT’ show up on the V.D.U screen if they are" 
PRINT" ‘alive’. Each position on the screen" 


J PRINT"frog use the 'DELETE' key. 


PRINT:PRINT > 
PRINT" Start with a simple pattern, such as" 
PRINT"a line, square or diamond." 


PRINT: PRINT 
PRINT" When you're happy with your pattern" 
PRINT"then press the 'RETURN' key." 


PRINT: PRINT: PRINT: PRINT: PRINT 
PRINT" Press spacebar to continue" 
key=GET 

CLS 

REM Enable auto key repeat. 
*FX12,0 

ENDPROC 


DEF PROCPROMPTS 
CLS 
PRINT TAB(Ø,Ø);"Enter pattern (spacebar & arrow ke 


' PRINT TAB(Ø,31) : "Press H for help, RETURN key to R 
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268Ø 
269Ø 
2700 
2710 
2720 
2730 
2746 
2750 
2760 
2770 
2788 
2796 
2800 
2810 
2820 


2830 
2840 
2850 
2860 
2870 
2888 
2890 
2900 
2910 
2920 
2936 
2940 
29560 
2960 
2970 
2986 
2999 
3680 
3919 
3020 
3030 


PRINT"lives or dies according to how many " 
PRINT"live squares are next to it, so if you" 
PRINT"start with a pattern of live creatures" 


PRINT"each 'generation' and the pattern of" 
PRINT"life will 'evolve'."* 

PRINT 

PRINT"Here are the rules of life, they apply" 
PRINT"to each character position on the" 
PRINT"screen:" 
PRINT 

PRINT? NUMBER" 
PRINT" or". 
PRINT"NEIGHBOURS" 
PRINT" * 
PRINT 

PRINT" Ø or 1 
PRINT" 2 
PRINT" 3 
PRINT" 4 to 8 
PRINT 

PRINT" Press spacebar to continue" 
PROCWAIT (2ØØ) 

REM Flush input buffer 

*FX15,1 
key=GET 
CLS: PRINT" 
PRINT* 
PRINT 


RESULT " 


Death from loneliness" 
No change" 

Breed a new frog" 

Death from overcrowding" 


ENTERING A PATTERN" 
te 


PRINT"on the next screen." 

PRINT: PRINT 

PRINT" To produce a frog press the spacebar" 
PRINT"then move the cursor using the arrow" 
PRINT"keys and press the spacebar again " 


SONY "PROFEEL" COLOUR TV/MONITOR 
David Willington of Harrow writes 
to tell us that he has connected his 
BBC micro to use his Sony Profeel 
monitor. The connector required is 
the same as for the disc interface 
(34 pin) and is obtainable complete 
with ribbon cable from Watford 
Electronics amongst others. The 


problem is in the numbering scheme 
used on these connectors which is 
different on the Sony from most other 
IDCs. 


PRINT"the pattern will (usually) change after" 


PRINT" You must enter a pattern of live frogs" 


PRINT"for your next frog. To delete a " 


pin numbers 19 and 33. 
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PRINT TAB(2Ø,15); 
ENDPROC 


DEF PROCLOGO 

LOCAL x$,y$ 

FOR i%=1TO8:READ note(i$) 

NEXT i$ 

FOR i$z1TO30:READ x$,y$ 

SOUND 1,-15,note (RND(8)) ,4 
PROCWAIT (29) 

3340 NEXT i$ 

PROCWAIT (20) 

SOUND 1,-15,101,460 

SOUND 2,-15,117,40 

SOUND 3,-15,129,40 

PROCWAIT (209) 

DATA 5,13,21,25,33,41,49,53 
DATA 21,11,19,9,7,9,7,11,15,7 
DATA 15,11,29,11,27,15,19,15,15,15 
DATA 11,15,19,7,19,13,31,7,29,7 
DATA 27,7,27,11,29,15,31,15,15,9 
DATA 7,13,9,15,23,7,15,13,27,9 
DATA 7,7,21,7,7,15,27,13,19,11 
ENDPROC 


DEF PROCBLOCK (x$,y$) 

VDU 31,x$,y$ 

3519 VDU 224;224;8,8,10,224;224; 
ENDPROC 


DEF PROCWAIT (t$) 
TIME=Ø 

REPEAT 

UNTIL TIME=t% 


BBC 34 WAY CONN TO VDU 
RGB Function Sony Equivalent no 
DIN no on non-Sony IDC 
5 Øv -> 8 2g 

- +12v 19 31 

3 blue 27 15 

2 green 26 17 

1 red 25 19 

4 Sync 30 9 

- mode switch 33 3 


Note - connect lgkohms between 
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This month we give a function that validates a date in the form DD/MM/YY although 
other characters can replace the / for example DD.MM.YY or DD-MM-YY would also be 
accepted. 

The lines 10-80 demonstrate the use of the function, and the function itself 
starts at line 1000. The variables day, mth, yr have purposely not been made LOCAL 
to the procedure so that you can use their values in the main program. 

Beware, because the function contains a DATA statement, and if your program has 
DATA statements too it would be adviseable to RESTORE to your data just in case 
(particularly if your DATA statements appear later in the program than line 1120. 


1Ø the cows come home-FALSE | 1040 sep=ASC (MIDS (date$,6,1) ) :IF 
20 REPEAT ^ ps | sep<32 OR sep>47 THEN 11460 | 
30 REPEAT 1858 day-VAL(LEFTS (date$, 2) ) 
Ag INPUT"Date in the form 19060 mth=VAL (MIDS (date$, 4,2) ) 
DD.MM.YY ",todays date$ 1978 yr- VAL(MIDS (date$,7,2)) 
50 UNTIL 7 1980 IF day<] OR mth<1 OR yr<@ THEN 
FNvalid date(todays date$) 1149 
60  PRINT"Date validated 198 FOR month=1 TO mth:READ 
Successfully" nda ys i n mth : NEXT 
70 UNTIL the cows come home 1100 IF yr MOD 4-0 AND mth=2 
80 END x m = ndays in mth-29 
og 1118 IF day»ndays in mth THEN 1149 
1000 DEF FNvalid date (date$) 1120 DATA 
1818 LOCAL month ,ndays in mth,sep 31,28,31 ,3Ø,31,3Ø,31 p3) 73Ø,31,3Ø,31 
1020 RESTORE 112Ø CUT 1138 =TRUE 
1030 sep-ASC(MIDS$ (date$,3,1)) :IF 1140 -FALSE E 
sep<32 OR sep>47 THEN 1149 by Sheridan Williams 


DISC SPACE ECONOMIES 

On disc systems, PAGE is automatically set to &1900. On cassette systems it is 
&EØØ. This means that you have more than 3K less memory in which to run programs on 
a disc based machine. Last month we gave a 'move-down' program to help get around 
this problem. But there is a better way around the problem in certain circumstances. 
If your program does not load or save DATA to disc (ie. if it does not use the PUT 
and GET byte commands), then the disc operating system only uses part of the buffer 
reserved for it. This means that you can set PAGE to &1200 (ie. PAGE-&1200 <return>) 
before using the computer (though remember not to press Break), and you will save 
1792 bytes of memory. 
[We have been testing this for some time, and have so far encountered no 
problems. Ed.] 
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aat 79 NS MM a9 49,9 9,949,929 19,959, 9,949,959, 9,959,949 ,9,9,* 49,5, 99,9 949 9,949,949, 9,9, 9,99949,9499 ot, RN utut Tutte tuo eco eo au e e ote us 


COLOURED TITLES | 

John Yale has sent in a hint which will enable you to highlight disc titles by 
using Teletext colour codes. 

Whilst coloured filenames are not possible on the disc, the disc title may be 
made coloured to make it stand out when a *CAT is done. Just insert the teletext 
colour code by using SHIFT and one of the function keys. You can also insert 


graphics characters in the same way. See "What to do on 1.2" in this issue for 
further details. E 


BEEBUG MAG March 1983 Volume-1 Issue-10 


$9, 9.0 9 8 o s o 6 9 08 070-0 070 0 0 a^ 0 


I (A SIMPLE LINE DRAWING PROGRAM) (is) 


by J C Fenton | 


MICRO SKETCI 
on 
testeð 


" How small can a 'drawing' program be while still remaining useful and fun? Answer 
- just one line! The single line program given below enables straight lines to be 
drawn between any two specified points on the screen, and some extremely good 
sketches can be obtained. 


When the program is RUN the screen will be cleared and the program will wait 
until a key is pressed (eg. <space>). After being 'started' in this way a display is 
given, in the top left hand corner of the screen, of the co-ordinates of a small 
'dot' cursor. The cursor is moved and lines are drawn by using the following keys: 


MOVE COMMANDS OTHER COMMANDS 
VET move left (p record ‘from’ position 
uP ae move right di li draw ‘to’ this position 
"AS move up Eo» "end" the session 
Z? move down 


Drawn lines are deleted by merely passing the cursor over them. The effect of 
this feature is to force a 'hole' in a line if you have to come out of a closed 
Shape. It is a simple enough matter to fill the hole back in by drawing a line which 
is only one 'position' size in length. 


10MODE4:X$—400: Y$—400 : REPEAT: G-GET: PLOT71 ,X$,Y$: X€-X2--A* (G244) -4* (G=46) : Y3=Y3+4% (G=9 
Ø) -4* (G=65) :MOVEAS, B$: PLOT69+64* (G=84) ,X%, Y%:A%=A%+(A%-X3) * (G=7Ø) :BS=BS+ (B$-Y2) * (G=7 
Ø) :VDUA,30:PRINT;X$;",";Y9$;" "2s VDU5: UNTILG=69:MODE7 == 


NS ARISING U Uo 
SIMPLE MUSICAL KEYBOARD (BEEBUG no.9) 


The "simple musical keyboard’ program submitted by J C Fenton may be improved by 
resetting the auto-repeat delay with *FX 11,5 and changing the duration of the 
note (the fourth parameter of the sound function) from 10 to 2. The slight 'blip' in 
the note after 1 second is eliminated and the same note can now be played repeatedly 
very quickly. 


*5*5*,* ooo ene ee ea oa eo eo eee eee 4*5 5*5 aat 9 49,7, 59,9, 107070707075767e7070767e7e707070 «767070767076 7070 07974 
e, 9,9,9, 9,9, 9,9, 9,9, 9, 9, 9,9, 9, 9,9 9 0 0 € 9 M 0 € 0 O O GO O € O O G9 6 0.9 0 6 0 € 0.O OO. O e D e e 0 0 5 O O € € 6 0 9 € 9 O O 0 0 60 0 9 9 0 0 9 0 0 0 0 9 "o € 
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EPSON SCREEN DUMP 
1) PUSH BUTTON DUMP 

There is an easy way to activate the Epson Screen Dump (BEEBUG no.9 p.12) during 
the running of a Basic program to print out the screen at any given point. The 
method was described in connection with the Seikosha, but not the Epson. It involves 
using the ON ERROR call. Simply make the first line of the program producing the 
Screen: 1 ON ERROR GOTO 10000 At line 10000 put the call to the screen dump, and 
press «Escape» when you want a copy of the screen. You must however make sure that 
the screen producing program is error-free, otherwise you will get a dump each time 
an error is encountered. To get around this you could make the printout call 
dependent on ERR-17, ie. 10000 IF ERR-17 THEN CALL... 
2)DISC CALL 

When using the Epson Dump from disc, if you have saved it with *SAVE "SDUMP" AQ 
BØØ AGG then you can automatically load it from disc AND run it using the call 
*SDUMP, (provided that SDUMP is in the disc library area - see '*LIB' in Disc Filing 
System article in this issue). SDUMP behaves in this way like a new command, since 
it is called in a similar way to other DFS commands, eg. *COMPACT etc. Do not call 
it *DUMP since this is a reserved word. 

To produce a Screen dump from a program when you press «Escape», just add the 
single line: ] ON ERROR VDU2:*SDUMP = 
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In this column we bring information and ideas about programs in our software 
library, including the Wordwise word processor. 


Wordwise continues to be very popular among BEEBUG members, especially now that we 
have been able to offer it with a 1.2 Operating System. And for the past two issues 
of BEEBUG, the whole magazine has been produced using Wordwise. This month we give 
a useful routine for those using Wordwise in conjunction with an Epson printer. 


WORDWISE 


CONFIGURING WORDWISE FOR EPSON PRINTERS 


Wordwise is probably the most popular word processor, and the Epson is probably 
the most popular printer for use with the BBC micro. I have used such a 
configuration for some time. The program below runs from Basic, and sets the user 
keys to produce a series of extremely useful text format commands. It then calls 
Wordwise. If you have a disc system you may wish to make this program auto-boot (see 
BEEBUG no.9 p.19). 


The keys set are as follows: 


£0 £1 £2 £3 £4 £5 £6 £7 £8 £9 
hash u/line u/line emph emph cond cond enlarge enlarge standard 
on off on off on off on off page 


For example, if you are entering text in Wordwise and you wish to make the following 
text enlarged then press 'shift-control-f7' you will see a green OCl4 appear, this 
is the command that the Epson needs to produce enlarged text. 


The ‘hash sign" option needs further explanation, as it requires that you have 
already set the switches inside the Epson for the British character set; see the. 
Epson manual for details. On pressing shift-control-fØ a long green command 
(0C27,82,0,35,27,82,3) appears which switches back the USA character set, prints a 
hash, and then switches back to British again. 


Finally the £9 key is set up for what I find the most useful starting 
configuration. See the back of the Wordwise manual for explanations. 


9 0 09 0 € 4 0 6 0 6 0 O d O U 
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19 REM Wordwise configure for Epson 150 REM Condensed on 
20 E 160 *KEY5 |1!10C15|1" 
30 REM Auto line feed at end of line 178 REM Condensed off 
40 *FX6,0 180 *KEY6 |!!0C18]|!" 
50 REM Hash sign 198 REM Enlarged on 
60 *KEYØ |110C27,82,0,35,27,82,3]| 1" 200 *KEY7 |110C14] 1" 
70 REM Underline on 210 REM Enlarged off 
80 *KEY] |!!0C27,45,1|!" 220 *KEY8 |!!0C29|1!" 
9g REM Underline off 230 

100 *KEY2 |1!10C27,45,0]| 1" 249 REM Default page settings 
110 REM Emphasised on 250 


120 *KEY3 |110C27,69]| 1" 260 *KEY9 |!!LM5|M| ! !LL76|M| 1 3 PL72| M 
| !TS2| MJ 1 13BS2| M] ! FEP|M] ! 1DP35|M] 1 1JOI M 

1DT4,10,15,20,25,30,35,40,45|M|M 

270 *WORDWISE 


.130 REM Emphasised off 
140 *KEY4 |110C27,70| |" 
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BEEBUG NEW ROM O 


A special arrangement has been agreed between Acorn and BEEBUG whereby BEEBUG 
members may obtain the Series One Machine Operating System in ROM at the price of 
£5.85 including VAT and post and packing. 

The ROM will be supplied with fitting instructions to enable members to install 
it in their machine. | 

If the computer does not subsequently operate correctly, members may take their 
machines to an Acorn dealer for the upgrade to be tested, which will be done at a 
charge of £6.00 plus VAT. This charge will be waived if the ROM is found to have 
been defective. If the computer has been damaged during the installation process, 
the dealer will make a repair charge. 

NOTES ON ORDERING 


le To get a new ROM, BEEBUG members should send a cheque for £5.85 to 
ROM Offer, BEEBUG, PO Box 109, High Wycombe, Bucks, HP1] 2TD. It is ESSENTIAL 
to include a cheque with order, and to give your membership number. 

2. ROM orders must not be combined with any other order - eg for software etc; 
and because of constraints on supply, multiple orders cannot be accepted until 
further notice. 

3. Because of uncertainties in supply, please allow 4-6 weeks for delivery. We 
undertake not to cash cheques until the week prior to despatch; and we will 
provide a monthly account of the supply situation in BEEBUG. Please keep a 
note of the date on which you posted your order so that you can relate this to 
future announcements. 

4. Please note that we cannot accept EPROM-based 0.1 operating systems 
in lieu of payment. The exchange of EPROMS for the new operating system can 
only be performed by Acorn dealers or by Acorn's service centre at Feltham. 


ADDRESS: ROM Offer, BEEBUG, PO Box 109, High Wycombe, Bucks, HPl1 2TD. ==] 


d Processor BEEBUG Discount 13% SAVE £5 


sophisticated word processing package for the BBC Micro, and 
compares very favourably with those currently available on other microcomputers. It 
makes full use of tne BBC micro's advanced facilities, and text is typed and edited 
in the 40 column Teletext mode, saving memory, thus allowing it to be used with more 
or less any TV. See the software review in this issue for further details. 

Wordwise is supplied in EPROM with simple fitting instructions, a full manual, 


This is a highly 


and a sample data cassette. Wordwise must be used in conjunction with a series. tes 


operating system. ER rov ERU 
The normal price of Wordwise is £39tVATz 44 LM 
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BACK ISSUES (Members only) 


| All back issues are kept in print (from April 1982). Subscriptions Address 
| Send  90p per issue PLUS an A5 SAE to the BEEBUG 

_ subscriptions address. This offer is for members Dept 1 

only, so it is ESSENTIAL to quote your membership 374 Wandsworth Rd 


number with your order. London 
SW8 4TE 


| SUBSCRIPTIONS 


Send all applications for membership, subscription renewals, and 
| subscription queries to the subscriptions address. 
Membership costs: £5.40 for 6 months (5 issues) 
: £9,90 for ] year (18 issues) 
European Membership £16 for 1 year. 
Elsewhere - Postal Zone A £19, Zone B £21, Zone C £23 


ST SOO a ee EN aU SSeS ccc SUD ARBORE 


== 
es 


== 


== 
ER 


zum 


EE 


Ze 


= 


EE 


= 


m 


Ce 


Software Address 


| SOFTWARE AND ROM OFFER (Members only) BEEBUG 
PO BOX 109 


These are available from the address opposite, which Baker Street 
is our NEW software address. (Note that this does High Wycombe 


not relate to Wordwise - in this instance please see Bucks 
magazine for details). HP1] 2TD 
p ug p 0: 9m (m O Ce 


i 
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IDEAS, HINTS & TIPS, PROGRAMS, AND LONGER ARTICLES 


SEE 


— 


2 


Substantial articles are particularly welcome and we 
|| will pay around £25 per page for these, but in this Editorial Address 
| case please give us warning of anything that you BEEBUG 
|| intend to write. In the case of material longer PO Box 56 
|| than a page, we would prefer this to be submitted on St Albans 

cassette or disc in machine readable form using Herts 

"Wordwise", "Minitext Editor" or other means. If you AL] 2AR 

use cassette, please include a backup copy at 300 

baud. 

We will also pay £10 for the best Hint or Tip that we publish, and £5 to the next I 
|| best. Please send all editorial material to the editorial address opposite. If you 
Ü require a reply it is essential to quote your membership number and enclose an SAE. | 
-— Mn l TEN i 
BEEBUG NEWSLETTER is edited and produced by Dr David Graham and Sheridan Williams. 
Technical Editor: Colin Opie. Production Editor: Phyllida Vanstone. 
Technical Assistant: Alan Webster. 


Thanks are due to Rob Pickering, John Yale, Adrian Calcraft, Tim Powys-Lybbe, and 
Graham Greatrix for assistance with this issue. | 
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All reasonable precautions are taken by BEEBUG to ensure that the advice and data 
given to readers are reliable. We cannot, however, guarantee it, and we cannot 
accept legal responsibility for it, neither can we guarantee the products reviewed 


D LCC er BEEBUG (c) March 1983. 
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BEEBUG MEMBERS SOFTWARE LIBRARY. NEW TITLES. 


APPLICATIONS 3 — ARTIST 2 £4.50 inc VAT + 50p. pp. 
(32k with joysticks) 


This program is a developement of that which appeared in the Dec/Jan issue. Many 


members wrote in to say how much they enjoyed this program, and this new version 
adds many of the features which were requested. 


The program allows pictures to be drawn on a Mode 2 screen in eight colours using 
the BBC joysticks to position Lines,  Triangles, Rectangles, Circles or just to 


doodle. All function selection is by positioning the cursor in the relevent menu box P 


displayed at the top of the screen and pushing the fire button, so there are no key 
functions to remember, all options being on view continuously. 


Functions provided are: Colour, Shape, Filled/Unfilled, Clear screen, Save to disc <% 


or tape, Plotting logic, and Scaled mode. Plotting logic corresponds to the first 
GCOL parameter and in Exclusive OR mode allows complex patterns to be drawn very 


quickly. Scaled mode restricts. the cursor movement to any selected part of the Då 


screen allowing fine details to be drawn. 


A status display is also maintained on the screen, showing the current colour, 
shape, plot mode, and cursor co-ordinates. This last feature allows the cursor to be 
very accurately positioned on the screen especially when used in conjunction with » 
the scaled mode. A full instruction manual is provided, including configuration ' 
details for using non-standard joysticks. 3 


This drawing package will be found to compare favourably with programs costing many | 
times the BEEBUG price of £4.50. The cassette contains both a cassette and a 
disc version. 


UTILITIES 2 — EXMON (16k) £6.90 inc VAT + 50p. pp. 


. EXMON is an extended machine code monitor for the BBC Micro. It was developed out of 
the winning program of BEEBUG's second software competition. A vast number of extra 
facilities have been added to the original entry, making EXMON far more than an 
ordinary monitor. The BBC micro is an extraordinarily advanced machine.  EXMON has 
been designed to complement it, and provides 30 new commands, all achieved in 
machine code. It is a must for anyone using machine code or assembler on the Beeb. 


The program occupies about 5k bytes and may be located anywhere in memory using one 
of its built in commands. When activated it displays the 6502 register contents at 
the top of the screen, and any selected portion of memory may be displayed in Hex, 
ASCII or disassembled mnemonics. The register or memory contents may be changed, and . 
program execution started or single stepped from the current program counter 
position until a breakpoint is reached (up to 5 breakpoints may be set at any time). 
Whilst single stepping, the next instruction is disassembled into mnemonic form and 
the register display updated. 


Some of the more unusual features of this Monitor are the ability to relocate . 
programs in memory (including itself !),ie EXMON can move a section of machine code, 
and adjust the code to run at the new location. EXMON accesses the symbol table of 
the current BASIC program, so that when debugging an assembler program it is not 
necessary to know the actual addresses within that program but only the names of the 
labels and data areas used. Arbitrary BASIC type expressions may also be used in 
many of the commands to calculate addresses etc.(except on O.S 9.1). The cassette 
contains both a cassette and disc version. 
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